knitr::opts_chunk$set(echo = TRUE, cache = TRUE,cache.lazy = FALSE, echo=TRUE)
source("http://bioconductor.org/biocLite.R")
## Bioconductor version 3.5 (BiocInstaller 1.26.0), ?biocLite for help
## A newer version of Bioconductor is available for this version of R,
## ?BiocUpgrade for help
require("stringr")
## Loading required package: stringr
require("MASS")
## Loading required package: MASS
require("ggplot2")
## Loading required package: ggplot2
q_value_cuttoff <- 0.0001
fkac <- "fkeita@kuhp.kyoto-u.ac.jp"
require(extrafont)
## Loading required package: extrafont
## Registering fonts with R
loadfonts(quiet = T)
#biocLite("GEOquery")
require(GEOquery)
## Loading required package: GEOquery
## Loading required package: Biobase
## Loading required package: BiocGenerics
## Loading required package: parallel
##
## Attaching package: 'BiocGenerics'
## The following objects are masked from 'package:parallel':
##
## clusterApply, clusterApplyLB, clusterCall, clusterEvalQ,
## clusterExport, clusterMap, parApply, parCapply, parLapply,
## parLapplyLB, parRapply, parSapply, parSapplyLB
## The following objects are masked from 'package:stats':
##
## IQR, mad, sd, var, xtabs
## The following objects are masked from 'package:base':
##
## anyDuplicated, append, as.data.frame, cbind, colMeans,
## colnames, colSums, do.call, duplicated, eval, evalq, Filter,
## Find, get, grep, grepl, intersect, is.unsorted, lapply,
## lengths, Map, mapply, match, mget, order, paste, pmax,
## pmax.int, pmin, pmin.int, Position, rank, rbind, Reduce,
## rowMeans, rownames, rowSums, sapply, setdiff, sort, table,
## tapply, union, unique, unsplit, which, which.max, which.min
## Welcome to Bioconductor
##
## Vignettes contain introductory material; view with
## 'browseVignettes()'. To cite Bioconductor, see
## 'citation("Biobase")', and for packages 'citation("pkgname")'.
## Setting options('download.file.method.GEOquery'='auto')
## Setting options('GEOquery.inmemory.gpl'=FALSE)
set.seed("20170821")
theme_ggh <- function(font.size=10,legend.position = "none") {
theme(axis.text.x = element_blank(),
axis.text.y = element_blank(),
axis.title = element_blank(),
axis.line = element_blank(),
axis.ticks = element_blank(),
plot.title = element_blank(),
panel.grid = element_blank(),
panel.border = element_blank(),
panel.spacing = element_blank(),
panel.background = element_blank(),
plot.background = element_blank(),
plot.margin = unit(c(0,0,0,0),"cm"),
text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
legend.position = "none")
}
#downloader::download(url = "ftp://ftp.ncbi.nlm.nih.gov/geo/series/GSE49nnn/GSE49910/matrix/GSE49910_series_matrix.txt.gz",
# destfile="./metadata/gse49910.gz")
#gunzip("./metadata/gse49910.gz")
sampleGSM <- read.table(file = "./metadata/gse49910",header = F,sep = "\t",stringsAsFactors = F,skip = 28,check.names = F,quote = "",nrows = 667)
sampleGSM$gsm_id <- str_extract(sampleGSM$V2,pattern = "GSM[0-9]*")
#downloader::download(url = "ftp://ftp.ncbi.nlm.nih.gov/geo/series/GSE49nnn/GSE49910/soft/GSE49910_family.soft.gz",
# destfile="./GSE49910_family.soft.gz")
gsm49910 <- getGEO(filename = "./GSE49910_family.soft.gz")
## Parsing....
#gsm49910@header
pca_GSM <- gsm49910@header$relation
pca_GSM <- pca_GSM[-length(pca_GSM)]
pca_GSM <- str_extract(pca_GSM, "GSM[0-9]*")
pca_GSM <- c(pca_GSM, gsm49910@header$sample_id)
rm(gsm49910)
gsm_annot <- list()
for(i in pca_GSM){
gsm_i <- getGEO(GEO = i,destdir = "./tempdata")
gsm_annot <- c(gsm_annot, list(gsm_i@header))
}
names(gsm_annot) <- pca_GSM
#gsm_annot$GSM347920
#annot <- base::unlist(gsm_annot,recursive = T,use.names = T)
#keyname <- "title"
#gsm_annot[[2]][keyname]
list_1nest <- function(nested_list){
nested_names <- c()
for(i in nested_list){
nested_names <- c(nested_names, names(i))
}
nested_names <- nested_names[!duplicated(nested_names)]
#print(paste(length(nested_names)," is number of nested_names"))
key_vector <- function(list, keyname){
result_vector <- c()
result_name <- names(list)
for(i in list){
#print(i[keyname])
result_word <- as.character(i[keyname])
result_vector <- c(result_vector, result_word)
}
names(result_vector) <- result_name
return(result_vector)
}
result_df <- NULL
for(j in nested_names){
#print(paste(j, "is now vectorized..."))
result_vector_j <- key_vector(nested_list, j)
result_df <- cbind(result_df, result_vector_j)
}
colnames(result_df) <- nested_names
result_df <- as.data.frame(result_df)
return(result_df)
}
df_fac2chr <- function(df){
df <- as.data.frame(df)
for(i in c(1:ncol(df))){
df[,i] <- as.character(df[,i])
}
return(df)
}
result_df <- list_1nest(gsm_annot)
result_df <- df_fac2chr(result_df)
wanted_df <- cbind(result_df$geo_accession,
result_df$characteristics_ch1,
result_df$source_name_ch1,
result_df$title)
write.table(x = wanted_df,
file = "wanted.csv",sep = ",",
row.names = T,col.names = NA)
#result_df$celdata <- paste(result_df$geo_accession, ".CEL",sep = "")
# getGEOSuppFiles("GSE49910",makeDirectory = F,baseDir = "./celfiles")
# untar(tarfile = "./celfiles/GSE49910_RAW.tar",exdir = "./celfiles/")
#
#
# for(i in c(1:nrow(result_df))){
# getGEOSuppFiles(GEO = result_df$geo_accession[i],makeDirectory = F,baseDir = "./celfiles")
# }
cels <- list.files(path = "./celfiles",pattern = ".CEL|.cel.gz",full.names = T)
liver_cels <- list.files(path = "./celfiles",pattern = "liver.CEL",full.names = T)
gsm_cels <- cels[str_detect(cels, pattern = "GSM[0-9]*")]
gsm_cels <- str_extract(gsm_cels, pattern = "GSM[0-9]*")
re_download <- result_df[!result_df$geo_accession %in% gsm_cels,]$geo_accession
#for(i in c(1:length(re_download))){
# getGEOSuppFiles(GEO = re_download[i],makeDirectory = F,baseDir = "./celfiles")
#}
## Warning in e$fun(obj, substitute(ex), parent.frame(), e$data): already
## exporting variable(s): cels
## Time difference of 1.86614 hours
require(RobLoxBioC)
## Loading required package: RobLoxBioC
## Loading required package: RobLox
## Loading required package: distrMod
## Loading required package: distr
## Loading required package: startupmsg
## Utilities for Start-Up Messages (version 0.9.4)
## For more information see ?"startupmsg", NEWS("startupmsg")
## Loading required package: sfsmisc
## Loading required package: SweaveListingUtils
## Utilities for Sweave Together with TeX 'listings' Package (version 0.7.7)
## NOTE: Support for this package will stop soon.
## Package 'knitr' is providing the same functionality in a better way.
## Some functions from package 'base' are intentionally masked ---see SweaveListingMASK().
## Note that global options are controlled by SweaveListingoptions() ---c.f. ?"SweaveListingoptions".
## For more information see ?"SweaveListingUtils", NEWS("SweaveListingUtils")
## There is a vignette to this package; try vignette("ExampleSweaveListingUtils").
##
## Attaching package: 'SweaveListingUtils'
## The following objects are masked from 'package:base':
##
## library, require
## Object Oriented Implementation of Distributions (version 2.6.2)
## Attention: Arithmetics on distribution objects are understood as operations on corresponding random variables (r.v.s); see distrARITH().
## Some functions from package 'stats' are intentionally masked ---see distrMASK().
## Note that global options are controlled by distroptions() ---c.f. ?"distroptions".
## For more information see ?"distr", NEWS("distr"), as well as
## http://distr.r-forge.r-project.org/
## Package "distrDoc" provides a vignette to this package as well as to several extension packages; try vignette("distr").
##
## Attaching package: 'distr'
## The following objects are masked from 'package:BiocGenerics':
##
## sd, width, width<-
## The following objects are masked from 'package:stats':
##
## df, qqplot, sd
## Loading required package: distrEx
## Extensions of Package 'distr' (version 2.6.1)
## Note: Packages "e1071", "moments", "fBasics" should be attached /before/ package "distrEx". See distrExMASK().Note: Extreme value distribution functionality has been moved to
## package "RobExtremes". See distrExMOVED().
## For more information see ?"distrEx", NEWS("distrEx"), as well as
## http://distr.r-forge.r-project.org/
## Package "distrDoc" provides a vignette to this package as well as to several related packages; try vignette("distr").
##
## Attaching package: 'distrEx'
## The following objects are masked from 'package:BiocGenerics':
##
## IQR, mad, var
## The following objects are masked from 'package:stats':
##
## IQR, mad, median, var
## Loading required package: RandVar
## Implementation of Random Variables (version 1.0.1)
## For more information see ?"RandVar", NEWS("RandVar"), as well as
## http://robast.r-forge.r-project.org/
## This package also includes a vignette; try vignette("RandVar").
## Loading required package: stats4
## Object Oriented Implementation of Probability Models (version 2.6.1)
## Some functions from pkg's 'base' and 'stats' are intentionally masked ---see distrModMASK().
## Note that global options are controlled by distrModoptions() ---c.f. ?"distrModoptions".
## For more information see ?"distrMod", NEWS("distrMod"), as well as
## http://distr.r-forge.r-project.org/
## There is a vignette to this package; try vignette("distrMod").
##
## Package "distrDoc" provides a vignette to the other distrXXX packages,
## as well as to several related packages; try vignette("distr").
##
## Attaching package: 'distrMod'
## The following object is masked from 'package:stats4':
##
## confint
## The following object is masked from 'package:stringr':
##
## fixed
## The following object is masked from 'package:stats':
##
## confint
## The following object is masked from 'package:base':
##
## norm
## Loading required package: RobAStBase
## Loading required package: rrcov
## Loading required package: robustbase
##
## Attaching package: 'robustbase'
## The following object is masked from 'package:Biobase':
##
## rowMedians
## Scalable Robust Estimators with High Breakdown Point (version 1.4-3)
## Robust Asymptotic Statistics (version 1.0.1)
## Some functions from pkg's 'stats' and 'graphics' are intentionally masked ---see RobAStBaseMASK().
## Note that global options are controlled by RobAStBaseoptions() ---c.f. ?"RobAStBaseoptions".
## For more information see ?"RobAStBase", NEWS("RobAStBase"), as well as
## http://robast.r-forge.r-project.org/
##
## Attaching package: 'RobAStBase'
## The following object is masked from 'package:graphics':
##
## clip
#rob5 <- exprs(robloxbioc(ReadAffy(filenames = cels5)))
# cels5 <- sample(cels,10, replace = F)
# start <- Sys.time()
# robeach <- NULL
# for(i in c(1:length(cels5))){
# print(cels5[i])
# rob_i <- exprs(robloxbioc(ReadAffy(filenames = cels5[i])))
# robeach <- cbind(robeach, rob_i)
# }
# colnames(robeach) <- cels
# finish <- Sys.time()
# time_robeach <- c(finish,start)
# time_robeach[1] - time_robeach[2]
require(doParallel)
require(foreach)
start <- Sys.time()
cl <- makeCluster(4)
registerDoParallel(cl)
rob_4each <- foreach(i=c(1:length(cels)),
.combine = "cbind",.packages = c("affy","RobLoxBioC")) %dopar% {
rob_i <- exprs(robloxbioc(ReadAffy(filenames = cels[i])))
rob_i
}
stopCluster(cl)
finish <- Sys.time()
time_robforeach <- c(finish,start)
time_robforeach[1] - time_robforeach[2]
## Time difference of 45.08736 mins
detach("package:GEOquery", unload=TRUE)
detach("package:RobLoxBioC", unload=TRUE)
detach("package:affy", unload=TRUE)
detach("package:Biobase", unload=TRUE)
## Warning: 'Biobase' namespace cannot be unloaded:
## namespace 'Biobase' is imported by 'AnnotationDbi', 'beadarray', 'RobLox' so cannot be unloaded
detach("package:BiocGenerics", unload=TRUE)
## Warning: 'BiocGenerics' namespace cannot be unloaded:
## namespace 'BiocGenerics' is imported by 'GenomeInfoDb', 'AnnotationDbi', 'S4Vectors', 'beadarray', 'IRanges', 'XVector', 'GenomicRanges', 'Biobase' so cannot be unloaded
detach("package:doParallel", unload=TRUE)
detach("package:foreach", unload=TRUE)
summarizer <- function(x){
base_mean <- function(x){base::mean(x)}
stats_median <- function(x){stats::median(x)}
stats_var <- function(x){stats::var(x)}
stats_mad <- function(x){stats::mad(x)}
lin_mean <- apply(x,1,base_mean)
lin_median <- apply(x,1,stats_median)
lin_var <- apply(x,1,stats_var)
lin_mad <- apply(x,1,stats_mad)
log2x <- log(x)
log2_mean <- apply(log2x,1,base_mean)
log2_median <- apply(log2x,1,stats_median)
log2_var <- apply(log2x, 1, stats_var)
log2_mad <- apply(log2x, 1, stats_mad)
result <- data.frame(lin_mean=lin_mean,
lin_mean_rank =rank(lin_mean),
lin_median=lin_median,
lin_median_rank =rank(lin_median),
lin_var=lin_var,
lin_var_rank=rank(lin_var),
lin_mad=lin_mad,
lin_mad_rank=rank(lin_mad),
log2_mean=log2_mean,
log2_mean_rank =rank(log2_mean),
log2_median=log2_median,
log2_median_rank=rank(log2_median),
log2_var=log2_var,
log2_var_rank=rank(log2_var),
log2_mad=log2_mad,
log2_mad_rank=rank(log2_mad))
return(result)
}
mas5summary <- summarizer(mas5_4each)
plot(mas5summary$lin_mean, mas5summary$lin_var)
#x <- mas5summary$lin_mean
#y <- mas5summary$lin_var
dist_check <- function(x,y,slope=NULL){
require(ggplot2)
if(is.null(slope)){
slope <- 1
}
df <- data.frame(x, y)
df_label <- c(deparse(substitute(x)),deparse(substitute(y)))
colnames(df) <- c("x", "y")
p <- ggplot()+
geom_abline(slope = slope, intercept = 0,size=1,colour="red")+
geom_point(data = df,mapping = aes(x=x,y=y),size=0.1)+
xlab(df_label[1])+ylab(df_label[2])+
theme_classic()+
theme(aspect.ratio = 1)
p
}
dist_check(mas5summary$lin_mean, mas5summary$lin_var)
dist_check(mas5summary$log2_mean,mas5summary$log2_var)
dist_check(mas5summary$log2_median,mas5summary$log2_mad)
robsummary <- summarizer(rob_4each)
dist_check(robsummary$lin_mean, robsummary$lin_var)
dist_check(robsummary$log2_mean,robsummary$log2_var)
dist_check(robsummary$log2_median,robsummary$log2_mad)
mas5lg2 <- log2(mas5_4each)
truehist(mas5lg2)
#mas5lg2 <- mas5lg2[(mas5summary$lin_median_rank / nrow(mas5summary)) > 3/4,]
dim(mas5lg2)
## [1] 54675 741
truehist(mas5lg2)
roblg2 <- log2(rob_4each)
truehist(roblg2)
require(stringr)
rowname_cands <- cels
rowname_cands <- str_replace(rowname_cands,"\\./celfiles/","")
data_colname <- rowname_cands
rowname_cands <- str_replace(rowname_cands, "\\.gz","")
rowname_cands <- str_replace(rowname_cands, "\\.CEL|\\.cel","")
head(rowname_cands)
## [1] "A_Alexander cells_liver" "A_C3A_liver"
## [3] "A_Hep 3B2.17_liver" "A_Hep G2_liver"
## [5] "A_huH1_liver" "A_HuH6_liver"
tail(rowname_cands)
## [1] "GSM556663" "GSM556665" "GSM92231" "GSM92232" "GSM92233" "GSM92234"
#rowname_cands
for(i in c(1:length(rowname_cands))){
if(str_detect(rowname_cands[i],"^[ABC]")){
rowname_cands[i] <- rowname_cands[i]
}
else if(str_detect(rowname_cands[i], "^GSM")){
rowname_cands[i] <- str_extract(rowname_cands[i], "^GSM[0-9]*")
}
else{
cat("unknown condition")
}
}
conv_mat <- data.frame(filename=cels,data_colname=data_colname,id=rowname_cands,stringsAsFactors = F)
conv_mat <- merge(conv_mat, result_df,by.x = "id", by.y = "geo_accession",sort = F,all.x = T)
conv_mat$title <- ifelse(test = is.na(conv_mat$title),yes = "",no = conv_mat$title)
conv_mat$source_name_ch1 <- ifelse(test = is.na(conv_mat$source_name_ch1),
yes = "",no = conv_mat$source_name_ch1)
conv_mat$characteristics_ch1 <- ifelse(test = is.na(conv_mat$characteristics_ch1),
yes = "",no = conv_mat$characteristics_ch1)
conv_mat$colname_tag <- base::paste(conv_mat$id, conv_mat$title)
convertvector <- function(inputvector, matrix_in_out){
colnames(matrix_in_out) <- c("in", "out")
if (sum(inputvector %in% matrix_in_out[["in"]]) != length(inputvector)) {
return("all inputvectors must be inclued matrix in")
}
else if(sum(duplicated(matrix_in_out[["in"]])!=0)){
return("input vector must be unique")
}
else{
output_vector <- c(NULL)
for (i in inputvector){
i_output <- matrix_in_out[matrix_in_out[,1]==i,2]
i_output <- as.character(i_output)
output_vector <- c(output_vector, i_output)
}
return(output_vector)
}
}
# base::colnames(mas5lg2) <- convertvector(inputvector = base::colnames(mas5lg2),
# matrix_in_out = data.frame(conv_mat$data_colname,
# conv_mat$colname_tag))
#
# base::colnames(roblg2) <- convertvector(inputvector = base::colnames(roblg2),
# matrix_in_out = data.frame(conv_mat$data_colname,
# conv_mat$colname_tag))
for interpretation of cluster
categ <- list(Tcell=c("T_cell","T cell","T cells","CD4 cells","Treg","t_cell","Effector memory","Central memory","Naive, donor"),
Bcell=c("B-cells","B cells","B cell"),
Mono_Macro = c("Monocyte","monocytes","monopcytes","Peripheral blood from healthy human donor","macrophages","Macrophages"),
Erythroblast = c("Erythroblast"),
BM_HSC =c("Bone marrow & progenitors","Myelocytes","MEP cells","GMP cells","CMP cells",
"HSC","Human composite bone marrow","peripheral blood, prior"),
Neutrophils=c("Neutrophils","neutrophils","PMN"),
Gametes=c("Sperm","Oocytes","oocytes"),
Centros=c("centrocyte","centroblast"),
NKcells=c("NK cells","Natural killer cells","Natural Killer cells "),
Dendritic_cells=c("Dendritic cells","dendritic cells","MDDC","DCs","Dcs"),
MSC=c("-defrived mesenchymal stem cells","BM MSC","BM-MSC","cell type: mesenchymal stem cells","derived mesenchymal stem cells"),
Plt=c("platelet"),
SMC=c("smooth muscle cells","Smooth Muscle Cells","SMCs","smooth muscle cell"),
Neuron=c("Nerve","astrocytes"),
Endocrine=c("adrenal medulla"),
Keratinocytes=c("keratinocytes"),
Hepatocytes=c("hepatocyte"),
Bone_etc=c("osteoblast","chondrocyte","DPSCs","adipocyte","adipose stem cell"),
Vascular=c("lymphatic endothelial cells","HUVEC","Vein ECs","blood vessel endothelial cell","HMVEC","cell type: Endothelial cells"),
Fibroblasts=c("Foreskin Cells","normal fibroblast","cell type: fibroblast","Human Fibroblast cells","PDB fibroblasts","fibroblasts_","Fibroblasts uninfected","Fibroblasts infected"),
Epitel=c("bronchial epithelial cells"),
Bladder=c("bladder"),
ES_iPS=c("ESC","iPS","hIPSC","ES cell","Human Embryonic Stem Cells","embryonic stem cells")
)
categ2 <- list(Blood_cell=c("T_cell","T cell","T cells","CD4 cells","Treg","t_cell","Effector memory","Central memory","Naive, donor","B-cells","B cells","B cell","Monocyte","monocytes","monopcytes","Peripheral blood from healthy human donor","macrophages","Macrophages","Erythroblast","Bone marrow & progenitors","Myelocytes","MEP cells","GMP cells","CMP cells","HSC","Human composite bone marrow","peripheral blood, prior","Neutrophils","neutrophils","PMN","centrocyte","centroblast","platelet","NK cells","Natural killer cells","Natural Killer cells ","Dendritic cells","dendritic cells","MDDC","DCs","Dcs"),
MSC=c("-defrived mesenchymal stem cells","BM MSC","BM-MSC","cell type: mesenchymal stem cells","derived mesenchymal stem cells"),
SMC=c("smooth muscle cells","Smooth Muscle Cells","SMCs","smooth muscle cell"),
Neuro_endo=c("Nerve","astrocytes","adrenal medulla"),
Hepatocytes=c("hepatocyte"),
Bone_soft=c("osteoblast","chondrocyte","DPSCs","adipocyte","adipose stem cell"),
Vascular=c("lymphatic endothelial cells","HUVEC","Vein ECs","blood vessel endothelial cell","HMVEC","cell type: Endothelial cells"),
Fibroblasts=c("Foreskin Cells","normal fibroblast","cell type: fibroblast","Human Fibroblast cells","PDB fibroblasts","fibroblasts_","Fibroblasts uninfected","Fibroblasts infected"),
Other=c("bronchial epithelial cells","bladder","keratinocytes"),
ES_iPS_germ=c("ESC","iPS","hIPSC","ES cell","Human Embryonic Stem Cells","embryonic stem cells","Sperm","Oocytes","oocytes")
)
#annotation_df <- data.frame(conv_mat$characteristics_ch1, conv_mat$source_name_ch1, conv_mat$title,stringsAsFactors = F)
#dictionaly_list <- categ
categolizer <- function(annotation_df, dictionaly_list){
require(stringr)
result_vector <- c()
category_names <- names(dictionaly_list)
vector_keyword <- function(search_vector, keyword_vector){
vector_boolen <- c()
for(j in c(1:length(search_vector))){
for(k in c(1:length(keyword_vector))){
boolen_temp1 <- str_detect(string = search_vector[j], keyword_vector[k])
vector_boolen <- c(vector_boolen, boolen_temp1)
}
}
return(sum(vector_boolen)!=0)
}
for(i in c(1:nrow(annotation_df))){
annotation_boolen_temp <- c()
for(l in c(1:length(category_names))){
boolen_temp2 <- vector_keyword(search_vector = annotation_df[i,],
keyword_vector = dictionaly_list[[l]])
annotation_boolen_temp <- c(annotation_boolen_temp, boolen_temp2)
}
category_words_i <- category_names[annotation_boolen_temp]
category_words_i <- paste(category_words_i,sep = "_",collapse = "_")
result_vector <- c(result_vector,category_words_i)
}
return(result_vector)
}
conv_mat$category <- categolizer(annotation_df = data.frame(conv_mat$characteristics_ch1,
conv_mat$source_name_ch1,
conv_mat$title,stringsAsFactors = F),
dictionaly_list = categ2)
conv_mat$sample_tag <- paste(conv_mat$category, conv_mat$id, sep = "_")
conv_mat$category <- ifelse(conv_mat$category=="",str_extract(conv_mat$colname_tag,"^[ABC]"),conv_mat$category)
#dim(mas5lg2)
#colnames(mas5lg2)
#conv_mat$id
colnames_temp <- colnames(mas5lg2)
colnames_temp <- str_replace_all(colnames_temp,pattern = "\\.cel\\.gz","")
colnames_temp <- str_replace_all(colnames_temp,pattern = "\\.cel|\\.CEL","")
colnametemp <- for(i in c(1:length(colnames_temp))){
if(str_detect(colnames_temp[i],"^[ABC]")){
colnames_temp[i] <- colnames_temp[i]
}
else if(str_detect(colnames_temp[i], "^GSM")){
colnames_temp[i] <- str_extract(colnames_temp[i], "^GSM[0-9]*")
}
else{
print("unknown condition")
}
}
#colnames_temp
#conv_mat$id
#colnames_temp[!colnames_temp %in% conv_mat$id]
#matrix_in_out = data.frame(conv_mat$id,conv_mat$sample_tag)
colnames_temp <- convertvector(inputvector = colnames_temp,
matrix_in_out = data.frame(conv_mat$id, conv_mat$sample_tag,stringsAsFactors = F))
colnames(mas5lg2) <- colnames_temp
colnames(roblg2) <- colnames_temp
rm(colnames_temp)
annot <- read.table(file = "2Garray.annot_2.txt",header = T,sep = "\t",stringsAsFactors = F)
annot <- annot[sort.list(annot$avg_sub,decreasing = F),]
deg <- annot[annot$q.value < q_value_cuttoff,]
other_genes <- c("CDH2","VIM","FN1")
others <- annot[annot$Gene.Symbol %in% other_genes,]
write.table(x = others, file = "genesExp_3_fromR137.txt",sep = "\t",row.names = T,col.names =NA)
ref_sort <- function(sort_vector, ref_vector){
result_vector <- c()
for(i in c(1:length(ref_vector))){
index_i <- which(sort_vector==ref_vector[i])
result_vector <- c(result_vector, index_i)
}
return(result_vector)
}
m <- mas5lg2[rownames(mas5lg2) %in% deg$Row.names,]
m <- m[ref_sort(sort_vector = rownames(m),ref_vector = deg$Row.names),]
m <- m[,ref_sort(sort_vector = colnames(m),ref_vector = conv_mat$sample_tag)]
colslider <- conv_mat$category
rowslider <- deg$gene_cluster
# df = t(m)
# colslider=rowslider
# rowslider=colslider
# ColV = T
# colname_label = F
# font.size = 1
# clst_method="average"
# dist_method="spearman"
ggheat <- function(df,
clst_method="average",
dist_method="spearman",
colslider, rowslider,
ColV=T, RowV=T,
colname_label=T, rowname_label=T,
colangle=45, rowangle=45,
colours=c("blue", "white", "red"),
key.axis.fontsize=12,
main="title",
add_p=NULL,
lmat=NULL,
lhei=NULL,lwid=NULL,
font.size=10,
rowslider_palette=NULL,
col_pallete=NULL){
require(ggplot2)
require(reshape2)##for melting
require(grid)
require(gridExtra)
require(ggdendro)
require(scales)
##common theme function
theme_ggh <- function(font.size=10,legend.position = "none") {
theme(axis.text.x = element_blank(),
axis.text.y = element_blank(),
axis.title = element_blank(),
axis.line = element_blank(),
axis.ticks = element_blank(),
plot.title = element_blank(),
panel.grid = element_blank(),
panel.border = element_blank(),
panel.spacing = element_blank(),
panel.background = element_blank(),
plot.background = element_blank(),
plot.margin = unit(c(0,0,0,0),"cm"),
text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
legend.position = "none"
)
}
##blank grid for plotting blank
blank_grid <- grid.rect(gp=gpar(col="white"))
df <- as.data.frame(df)
##clustering if needed
cluster_data <- list()
if(ColV==T){
dist_x <- as.dist(1-cor(as.matrix(df),method = dist_method))
clst_x <- hclust(dist_x,method = clst_method)
df <- df[,clst_x$order]
colslider <- colslider[clst_x$order]
cluster_data <- append(cluster_data, list(clst_x))
}
if(RowV==T){
dist_y <- as.dist(1-cor(as.matrix(t(df)),method = dist_method))
clst_y <- hclust(dist_y,method = clst_method)
df <- df[clst_y$order,]
rowslider <- rowslider[clst_y$order]
cluster_data <- append(cluster_data, list(clst_y))
}
##matrix prepareation
colname <- colnames(df)
colname <- data.frame(text=colname, x=c(1:length(colname)),colslider=colslider)
colnames(df) <- c(1:ncol(df))
rowname <- rownames(df)
rowname <- data.frame(text=rowname, y=c(1:length(rowname)),rowslider=rowslider)
rownames(df) <- c(1:nrow(df))
tiledata <- melt(as.matrix(df))
##heatmap is p1
p1 <- ggplot()+
geom_tile(data = tiledata, mapping = aes(x=Var2, y = Var1, fill=value))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
scale_fill_gradient2(low = colours[1],mid = colours[2],high = colours[3],midpoint = (max(tiledata$value)+min(tiledata$value))/2)+
guides(fill=F)+
theme_ggh()
#p1
##colslider is cols
cols <- ggplot()+
geom_tile(data=colname,aes(x=x,y=0,fill=colslider))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
theme_ggh()
## scale_fill_identity(guide = "legend")+
#cols
if(!is.null(rowslider_palette)){
add_fill <- function(){return(scale_fill_manual(values = rowslider_palette,name="category"))}
}else{
add_fill <- function(){return(scale_fill_discrete(name="category"))}
}
##rowslider is rows
rows <- ggplot()+
geom_tile(data=rowname,aes(x=0,y=y,fill=rowslider))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
add_fill()+
theme(legend.text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
legend.title =element_text(family = "Arial",size=font.size+2,lineheight = 0.7))
rows_grob <- ggplot_gtable(ggplot_build(rows))
id.legend <- which(sapply(rows_grob$grobs, function(x) x$name)=="guide-box")
rows_legend <- rows_grob$grobs[[id.legend]]
rows <- ggplot()+
geom_tile(data=rowname,aes(x=0,y=y,fill=rowslider))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
add_fill()+
theme_ggh()
#rows
##col dendrogram if needed
if(ColV==T){
coldend <- as.dendrogram(clst_x)
#plot(coldend)
coldend <- segment(dendro_data(coldend))
cold <- ggplot()+
geom_segment(data=coldend,aes(x=x, y=y, xend=xend, yend=yend))+
scale_x_continuous(expand=c(0,0),limits = c(0.5,max(coldend$xend)+0.5))+
scale_y_continuous(expand=c(0,0))+
theme_ggh()
#cold
}else{
cold <- blank_grid
}
##row dendrogram if needed
if(RowV==T){
rowdend <- as.dendrogram(clst_y)
#plot(rowdend)
rowdend <- segment(dendro_data(rowdend))
rowd <- ggplot()+
geom_segment(data = rowdend,aes(x=x, y=y, xend=xend, yend=yend))+
scale_x_continuous(expand=c(0,0),limits = c(0.5,max(rowdend$xend)+0.5))+
scale_y_reverse(expand=c(0,0))+
theme_ggh()+
coord_flip()
#rowd
}else{
rowd <- blank_grid
}
##key histgram(density plot)
key_hist <- hist(tiledata$value,breaks = 50,plot = F)
max_hist <- max(key_hist$density)
key_density <- data.frame(range=seq(min(tiledata$value)-1, max(tiledata$value)+1, 0.02))
key_density_range <- density(tiledata$value)
key <- ggplot()+
geom_tile(data = key_density,
mapping = aes(x = range, y=max_hist/2*1.2,fill=range,width=0.02, height=max_hist*1.2),
show.legend = F)+
scale_fill_gradient2(low = colours[1],mid = colours[2],high = colours[3],
midpoint = (max(tiledata$value)+min(tiledata$value))/2,
limits=c(max(tiledata$value),min(tiledata$value)),
oob=squish)+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
geom_histogram(data = tiledata,mapping = aes(x=value,y=..density..),
alpha=0.8, binwidth = (max(tiledata$value)-min(tiledata$value))/50)+
guides(fill=F,colour=F)+xlab("")+ylab("")+
theme_classic()+
theme(text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
axis.text.x = element_text(family = "Arial",size=key.axis.fontsize),
axis.text.y = element_text(family = "Arial",size=key.axis.fontsize),
plot.margin = unit(c(0,0,-0.02,-0.015),"native"))
#key
##colnames
if(colname_label==T){
colname_label <- ggplot()+
geom_text(data=colname,mapping = aes(x=x,y=0, label=text,angle=colangle),
size=3,hjust=0)+
scale_x_continuous(expand=c(0,0),limits = c(min(colname$x)-0.5, max(colname$x)+0.5))+
scale_y_continuous(expand=c(0,0),limits = c(0,1))+
theme_ggh(font.size =font.size)
colname_table <- ggplot_gtable(ggplot_build(colname_label))
colname_table$layout$clip[colname_table$layout$name=="panel"] <- "off"
#class(colname_table)
#colname_label
}else{
colname_label <- blank_grid
colname_table <- blank_grid
}
##rownames
if(rowname_label==T){
rowname_label <- ggplot()+
geom_text(data = rowname,mapping = aes(x=0,y=y, label=text,angle=rowangle),
size=3,hjust=0)+
scale_x_continuous(expand=c(0,0),limits = c(0,0.05))+
scale_y_continuous(expand=c(0,0),limits = c(min(rowname$y)-0.5, max(rowname$y)+0.5))+
theme_ggh(font.size =font.size)
rowname_table <- ggplot_gtable(ggplot_build(rowname_label))
rowname_table$layout$clip[rowname_table$layout$name=="panel"] <- "off"
#rowname_label
}else{
rowname_label <- blank_grid
rowname_table <- blank_grid
}
if(!is.null(add_p)){
add <- add_p
}else{
add <- blank_grid
}
#add <- b1
add <- rows_legend
##layout
if(is.null(lmat) | is.null(lwid) | is.null(lhei)){
lmat <- rbind(c(7,7,1,1,1,1),
c(7,7,5,1,1,1),
c(7,7,3,1,1,1),
c(6,4,2,9,10,1),
c(1,1,8,1,1,1))
lwid <- c(0.2, 0.1, 1, 0.1,0.5,0.01)
lhei <- c(0.1,0.2,0.1,2,0.01)
}
g1 <- grid.arrange(blank_grid,#1
p1,#2
cols,#3
rows,#4
cold,#5
rowd,#6
key,#7
colname_table,#8
rowname_table,#9
add,#10
layout_matrix=lmat,heights=lhei, widths=lwid,
top=textGrob(main, gp=gpar(fontsize=20,fontfamily="Arial")))
result_list <- list(plot_data=g1, cluster_data=cluster_data)
return(result_list)
}
lmat <- rbind(c(7,7,1,1,1,1),
c(7,7,5,1,1,1),
c(7,7,3,1,1,1),
c(6,4,2,9,10,1),
c(1,1,8,1,1,1))
lwid <- c(0.2, 0.1, 1, 0.01,0.5,0.01)
lhei <- c(0.1,0.2,0.1,2,0.01)
ggheat(df = m,colslider = colslider,rowslider=rowslider)
## Loading required package: reshape2
## Loading required package: grid
## Loading required package: gridExtra
##
## Attaching package: 'gridExtra'
## The following object is masked from 'package:Biobase':
##
## combine
## The following object is masked from 'package:BiocGenerics':
##
## combine
## Loading required package: ggdendro
## Loading required package: scales
## Warning: Ignoring unknown aesthetics: width, height
## $plot_data
## TableGrob (6 x 6) "arrange": 11 grobs
## z cells name grob
## 1 1 (2-6,1-6) arrange rect[GRID.rect.257]
## 2 2 (5-5,3-3) arrange gtable[layout]
## 3 3 (4-4,3-3) arrange gtable[layout]
## 4 4 (5-5,2-2) arrange gtable[layout]
## 5 5 (3-3,3-3) arrange gtable[layout]
## 6 6 (5-5,1-1) arrange gtable[layout]
## 7 7 (2-4,1-2) arrange gtable[layout]
## 8 8 (6-6,3-3) arrange gtable[layout]
## 9 9 (5-5,4-4) arrange gtable[layout]
## 10 10 (5-5,5-5) arrange gtable[guide-box]
## 11 11 (1-1,1-6) arrange text[GRID.text.534]
##
## $cluster_data
## $cluster_data[[1]]
##
## Call:
## hclust(d = dist_x, method = clst_method)
##
## Cluster method : average
## Number of objects: 741
##
##
## $cluster_data[[2]]
##
## Call:
## hclust(d = dist_y, method = clst_method)
##
## Cluster method : average
## Number of objects: 137
res <- ggheat(df = t(m), colslider=rowslider ,rowslider=colslider, ColV = T,colname_label = F,font.size = 0.2)
## Warning: Ignoring unknown aesthetics: width, height
res <- ggheat(df = t(m), colslider=rowslider ,rowslider=colslider, ColV = T,colname_label = F,rowname_label = F,font.size = 14,clst_method = "ward.D2",lmat=lmat, lwid=lwid, lhei = lhei,main = "")
## Warning: Ignoring unknown aesthetics: width, height
grid.draw(res$plot_data)
ggsave(plot=res$plot_data,filename = "pca_clst2.tiff",dpi = 300,width = 18,height = 18,units = "cm")
grid.draw(res$plot_data)
res$cluster_data
## [[1]]
##
## Call:
## hclust(d = dist_x, method = clst_method)
##
## Cluster method : ward.D2
## Number of objects: 137
##
##
## [[2]]
##
## Call:
## hclust(d = dist_y, method = clst_method)
##
## Cluster method : ward.D2
## Number of objects: 741
one2multi_detect <- function(target_vector, search_vector){
require("stringr")
result_bool_vector <- c()
for (i in c(1:length(target_vector))){
bool_j <- c()
for (j in c(1:length(search_vector))){
bool_j <- c(bool_j,
str_detect(string = target_vector[i],
pattern = search_vector[j]))
}
bool_i <- sum(bool_j != 0)
result_bool_vector <- c(result_bool_vector, as.logical(bool_i))
}
return(result_bool_vector)
}
out_words <- c("Blood", "ES_iPS_germ","Other")
limited_m <- m[,!one2multi_detect(colnames(m), out_words)]
limited_colslider <- colslider[!one2multi_detect(colslider,out_words)]
limited_res <- ggheat(df = t(limited_m), colslider=rowslider ,rowslider=limited_colslider, ColV = T,colname_label = F,rowname_label = F,font.size = 14,clst_method = "ward.D2",lmat=lmat, lwid=lwid, lhei = lhei,main = "")
## Warning: Ignoring unknown aesthetics: width, height
grid.draw(limited_res$plot_data)
ggsave(plot=limited_res$plot_data,filename = "limited_pca_clst2.tiff",dpi = 300,width = 18,height = 18,units = "cm")
grid.draw(res$plot_data)
http://colorbrewer2.org/#type=qualitative&scheme=Paired&n=10
newcol <- c(A="#e31a1c",B="#1f78b4",C="#33a02c",
Bone_soft="#fdbf6f",Fibroblasts="#ff7f00",Hepatocytes="#fb9a99",MSC="#a6cee3",
Neuro_endo="#cab2d6",SMC="#6a3d9a",Vascular="#b2df8a")
limited_res <- ggheat(df = t(limited_m), colslider=rowslider ,rowslider=limited_colslider, ColV = T,colname_label = F,rowname_label = F,font.size = 14,clst_method = "ward.D2",lmat=lmat, lwid=lwid, lhei = lhei,main = "",rowslider_palette = newcol)
## Warning: Ignoring unknown aesthetics: width, height
ggsave(plot = limited_res$plot_data, filename = "limited_heat_newcol.tiff",dpi = 300,width = 18,height = 18,units = "cm")
q_value_cuttoff_re <- 0.001
deg_B <- annot[annot$q.value < q_value_cuttoff_re,]
out_words_B <- c("Blood", "ES_iPS_germ","Other","Hepatocytes", "_A_")
nnn <- mas5lg2[rownames(mas5lg2) %in% deg_B$Row.names,]
nnn <- nnn[ref_sort(sort_vector = rownames(nnn),ref_vector = deg_B$Row.names),]
nnn <- nnn[,ref_sort(sort_vector = colnames(nnn),ref_vector = conv_mat$sample_tag)]
nnn <- nnn[,!one2multi_detect(colnames(nnn), out_words_B)]
nnn <- as.data.frame(nnn)
colslider_B <- conv_mat$category
colslider_B
## [1] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [6] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [11] "Blood_cell" "Blood_cell" "SMC" "SMC" "SMC"
## [16] "SMC" "SMC" "SMC" "Other" "Other"
## [21] "Other" "Other" "Other" "Other" "Other"
## [26] "Other" "Other" "Other" "Blood_cell" "Blood_cell"
## [31] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [36] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [41] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [46] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [51] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [56] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [61] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [66] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [71] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [76] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [81] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [86] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [91] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [96] "Blood_cell" "Blood_cell" "Vascular" "Vascular" "Vascular"
## [101] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [106] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [111] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [116] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [121] "Blood_cell" "ES_iPS_germ" "ES_iPS_germ" "Blood_cell" "Blood_cell"
## [126] "Blood_cell" "Blood_cell" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [131] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "Other" "Other"
## [136] "Other" "Other" "Other" "Other" "Other"
## [141] "Other" "Other" "Other" "Other" "Other"
## [146] "Other" "Other" "Other" "Other" "Other"
## [151] "Other" "Other" "Other" "Other" "Other"
## [156] "Other" "Other" "Other" "Blood_cell" "Blood_cell"
## [161] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [166] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [171] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [176] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [181] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [186] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [191] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [196] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [201] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [206] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [211] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [216] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [221] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [226] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [231] "ES_iPS_germ" "ES_iPS_germ" "Bone_soft" "Bone_soft" "Bone_soft"
## [236] "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft"
## [241] "Bone_soft" "MSC" "MSC" "MSC" "Bone_soft"
## [246] "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft"
## [251] "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft"
## [256] "Bone_soft" "MSC" "MSC" "MSC" "MSC"
## [261] "MSC" "MSC" "MSC" "MSC" "MSC"
## [266] "MSC" "MSC" "MSC" "MSC" "MSC"
## [271] "MSC" "MSC" "MSC" "MSC" "MSC"
## [276] "MSC" "MSC" "MSC" "MSC" "MSC"
## [281] "MSC" "MSC" "MSC" "MSC" "Blood_cell"
## [286] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [291] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [296] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [301] "Blood_cell" "Bone_soft" "Bone_soft" "Bone_soft" "Bone_soft"
## [306] "Bone_soft" "Bone_soft" "Blood_cell" "Blood_cell" "Blood_cell"
## [311] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [316] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [321] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [326] "Blood_cell" "Blood_cell" "Blood_cell" "SMC" "SMC"
## [331] "SMC" "SMC" "SMC" "SMC" "Blood_cell"
## [336] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [341] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [346] "Blood_cell" "Other" "Other" "Other" "Other"
## [351] "Other" "Other" "Blood_cell" "Blood_cell" "Blood_cell"
## [356] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [361] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [366] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [371] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "ES_iPS_germ"
## [376] "ES_iPS_germ" "ES_iPS_germ" "Blood_cell" "Blood_cell" "Blood_cell"
## [381] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [386] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Vascular"
## [391] "Vascular" "Vascular" "Vascular" "Blood_cell" "Blood_cell"
## [396] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [401] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [406] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [411] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [416] "MSC" "MSC" "MSC" "MSC" "Vascular"
## [421] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [426] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [431] "Vascular" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [436] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [441] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [446] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [451] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [456] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [461] "Blood_cell" "Fibroblasts" "Fibroblasts" "Fibroblasts" "Fibroblasts"
## [466] "Vascular" "Vascular" "SMC" "SMC" "ES_iPS_germ"
## [471] "ES_iPS_germ" "ES_iPS_germ" "Fibroblasts" "Fibroblasts" "ES_iPS_germ"
## [476] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "Blood_cell" "Blood_cell"
## [481] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [486] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [491] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [496] "Fibroblasts" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [501] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [506] "ES_iPS_germ" "Fibroblasts" "Fibroblasts" "Fibroblasts" "ES_iPS_germ"
## [511] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [516] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [521] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [526] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [531] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "ES_iPS_germ"
## [536] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [541] "Blood_cell" "Blood_cell" "Blood_cell" "Vascular" "Vascular"
## [546] "Vascular" "Vascular" "Fibroblasts" "ES_iPS_germ" "ES_iPS_germ"
## [551] "ES_iPS_germ" "Vascular" "Vascular" "Vascular" "Vascular"
## [556] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [561] "Vascular" "Vascular" "Vascular" "Vascular" "Vascular"
## [566] "Vascular" "Vascular" "Bone_soft" "Bone_soft" "Bone_soft"
## [571] "Bone_soft" "Bone_soft" "Blood_cell" "Blood_cell" "Blood_cell"
## [576] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [581] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [586] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [591] "Blood_cell" "MSC" "MSC" "MSC" "MSC"
## [596] "MSC" "MSC" "MSC" "MSC" "Hepatocytes"
## [601] "Hepatocytes" "Hepatocytes" "Blood_cell" "Blood_cell" "Blood_cell"
## [606] "Blood_cell" "Blood_cell" "MSC" "MSC" "MSC"
## [611] "MSC" "MSC" "MSC" "MSC" "MSC"
## [616] "MSC" "ES_iPS_germ" "Neuro_endo" "Neuro_endo" "Vascular"
## [621] "Vascular" "Vascular" "Vascular" "Vascular" "Blood_cell"
## [626] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [631] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [636] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [641] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [646] "Blood_cell" "Vascular" "Vascular" "SMC" "SMC"
## [651] "Fibroblasts" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [656] "ES_iPS_germ" "Bone_soft" "Bone_soft" "Bone_soft" "ES_iPS_germ"
## [661] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [666] "Fibroblasts" "Fibroblasts" "Fibroblasts" "Fibroblasts" "Fibroblasts"
## [671] "Fibroblasts" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [676] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ"
## [681] "ES_iPS_germ" "ES_iPS_germ" "ES_iPS_germ" "Neuro_endo" "Neuro_endo"
## [686] "Neuro_endo" "Neuro_endo" "Neuro_endo" "Neuro_endo" "ES_iPS_germ"
## [691] "ES_iPS_germ" "ES_iPS_germ" "Blood_cell" "Blood_cell" "Blood_cell"
## [696] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [701] "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell" "Blood_cell"
## [706] "Vascular" "Blood_cell" "Blood_cell" "Blood_cell" "Neuro_endo"
## [711] "Neuro_endo" "Neuro_endo" "Neuro_endo" "A" "A"
## [716] "A" "A" "A" "A" "A"
## [721] "A" "A" "A" "B" "B"
## [726] "B" "B" "B" "B" "B"
## [731] "B" "B" "B" "B" "B"
## [736] "B" "C" "C" "C" "C"
## [741] "C"
colslider_B <- colslider_B[!one2multi_detect(colslider_B, out_words)]
colslider_B <- colslider_B[colslider_B!= "A"]
colslider_B <- colslider_B[colslider_B!= "Hepatocytes"]
tmp <- data.frame(colslider_B, colnames(nnn))
tmp
## colslider_B colnames.nnn.
## 1 SMC SMC_GSM116101
## 2 SMC SMC_GSM116102
## 3 SMC SMC_GSM116103
## 4 SMC SMC_GSM116104
## 5 SMC SMC_GSM116105
## 6 SMC SMC_GSM116106
## 7 Vascular Vascular_GSM141251
## 8 Vascular Vascular_GSM141252
## 9 Vascular Vascular_GSM141253
## 10 Vascular Vascular_GSM141255
## 11 Vascular Vascular_GSM143717
## 12 Vascular Vascular_GSM143726
## 13 Vascular Vascular_GSM143727
## 14 Vascular Vascular_GSM143728
## 15 Vascular Vascular_GSM143729
## 16 Vascular Vascular_GSM143730
## 17 Vascular Vascular_GSM143731
## 18 Vascular Vascular_GSM143732
## 19 Vascular Vascular_GSM143733
## 20 Vascular Vascular_GSM143898
## 21 Vascular Vascular_GSM143900
## 22 Vascular Vascular_GSM143907
## 23 Vascular Vascular_GSM143910
## 24 Vascular Vascular_GSM143914
## 25 Bone_soft Bone_soft_GSM239260
## 26 Bone_soft Bone_soft_GSM239379
## 27 Bone_soft Bone_soft_GSM239457
## 28 Bone_soft Bone_soft_GSM239606
## 29 Bone_soft Bone_soft_GSM239612
## 30 Bone_soft Bone_soft_GSM239613
## 31 Bone_soft Bone_soft_GSM239616
## 32 Bone_soft Bone_soft_GSM239668
## 33 Bone_soft Bone_soft_GSM239669
## 34 MSC MSC_GSM250019
## 35 MSC MSC_GSM250020
## 36 MSC MSC_GSM250021
## 37 Bone_soft Bone_soft_GSM260305
## 38 Bone_soft Bone_soft_GSM260306
## 39 Bone_soft Bone_soft_GSM260307
## 40 Bone_soft Bone_soft_GSM260308
## 41 Bone_soft Bone_soft_GSM260309
## 42 Bone_soft Bone_soft_GSM260310
## 43 Bone_soft Bone_soft_GSM260311
## 44 Bone_soft Bone_soft_GSM260312
## 45 Bone_soft Bone_soft_GSM260313
## 46 Bone_soft Bone_soft_GSM260314
## 47 Bone_soft Bone_soft_GSM260321
## 48 Bone_soft Bone_soft_GSM260322
## 49 MSC MSC_GSM260657
## 50 MSC MSC_GSM260658
## 51 MSC MSC_GSM260659
## 52 MSC MSC_GSM260661
## 53 MSC MSC_GSM260662
## 54 MSC MSC_GSM260663
## 55 MSC MSC_GSM260664
## 56 MSC MSC_GSM260665
## 57 MSC MSC_GSM260666
## 58 MSC MSC_GSM260667
## 59 MSC MSC_GSM260668
## 60 MSC MSC_GSM260669
## 61 MSC MSC_GSM260670
## 62 MSC MSC_GSM260671
## 63 MSC MSC_GSM260672
## 64 MSC MSC_GSM260673
## 65 MSC MSC_GSM260674
## 66 MSC MSC_GSM260675
## 67 MSC MSC_GSM260676
## 68 MSC MSC_GSM260678
## 69 MSC MSC_GSM260679
## 70 MSC MSC_GSM260680
## 71 MSC MSC_GSM260681
## 72 MSC MSC_GSM260682
## 73 MSC MSC_GSM260683
## 74 MSC MSC_GSM260684
## 75 MSC MSC_GSM260685
## 76 MSC MSC_GSM260686
## 77 Bone_soft Bone_soft_GSM265494
## 78 Bone_soft Bone_soft_GSM265495
## 79 Bone_soft Bone_soft_GSM265496
## 80 Bone_soft Bone_soft_GSM265497
## 81 Bone_soft Bone_soft_GSM265498
## 82 Bone_soft Bone_soft_GSM265499
## 83 SMC SMC_GSM287216
## 84 SMC SMC_GSM287217
## 85 SMC SMC_GSM287218
## 86 SMC SMC_GSM287219
## 87 SMC SMC_GSM287220
## 88 SMC SMC_GSM287222
## 89 Vascular Vascular_GSM305784
## 90 Vascular Vascular_GSM305785
## 91 Vascular Vascular_GSM305786
## 92 Vascular Vascular_GSM305787
## 93 MSC MSC_GSM322374
## 94 MSC MSC_GSM322375
## 95 MSC MSC_GSM322376
## 96 MSC MSC_GSM322377
## 97 Vascular Vascular_GSM330313
## 98 Vascular Vascular_GSM330314
## 99 Vascular Vascular_GSM330315
## 100 Vascular Vascular_GSM330316
## 101 Vascular Vascular_GSM335393
## 102 Vascular Vascular_GSM335395
## 103 Vascular Vascular_GSM335396
## 104 Vascular Vascular_GSM335851
## 105 Vascular Vascular_GSM335859
## 106 Vascular Vascular_GSM335904
## 107 Vascular Vascular_GSM335906
## 108 Vascular Vascular_GSM336559
## 109 Fibroblasts Fibroblasts_GSM346941
## 110 Fibroblasts Fibroblasts_GSM346942
## 111 Fibroblasts Fibroblasts_GSM346943
## 112 Fibroblasts Fibroblasts_GSM346944
## 113 Vascular Vascular_GSM346951
## 114 Vascular Vascular_GSM346952
## 115 SMC SMC_GSM346959
## 116 SMC SMC_GSM346960
## 117 Fibroblasts Fibroblasts_GSM347919
## 118 Fibroblasts Fibroblasts_GSM347920
## 119 Fibroblasts Fibroblasts_GSM366942
## 120 Fibroblasts Fibroblasts_GSM372142
## 121 Fibroblasts Fibroblasts_GSM372144
## 122 Fibroblasts Fibroblasts_GSM372146
## 123 Vascular Vascular_GSM385333
## 124 Vascular Vascular_GSM385338
## 125 Vascular Vascular_GSM385350
## 126 Vascular Vascular_GSM385353
## 127 Fibroblasts Fibroblasts_GSM402707
## 128 Vascular Vascular_GSM410666
## 129 Vascular Vascular_GSM410667
## 130 Vascular Vascular_GSM410668
## 131 Vascular Vascular_GSM410669
## 132 Vascular Vascular_GSM410672
## 133 Vascular Vascular_GSM410673
## 134 Vascular Vascular_GSM410674
## 135 Vascular Vascular_GSM410675
## 136 Vascular Vascular_GSM410678
## 137 Vascular Vascular_GSM410679
## 138 Vascular Vascular_GSM410680
## 139 Vascular Vascular_GSM410681
## 140 Vascular Vascular_GSM410684
## 141 Vascular Vascular_GSM410685
## 142 Vascular Vascular_GSM410686
## 143 Vascular Vascular_GSM410687
## 144 Bone_soft Bone_soft_GSM413840
## 145 Bone_soft Bone_soft_GSM413842
## 146 Bone_soft Bone_soft_GSM413846
## 147 Bone_soft Bone_soft_GSM413847
## 148 Bone_soft Bone_soft_GSM413848
## 149 MSC MSC_GSM451153
## 150 MSC MSC_GSM451154
## 151 MSC MSC_GSM451155
## 152 MSC MSC_GSM451156
## 153 MSC MSC_GSM451157
## 154 MSC MSC_GSM451158
## 155 MSC MSC_GSM451160
## 156 MSC MSC_GSM451161
## 157 MSC MSC_GSM469125
## 158 MSC MSC_GSM469126
## 159 MSC MSC_GSM469127
## 160 MSC MSC_GSM469128
## 161 MSC MSC_GSM469129
## 162 MSC MSC_GSM469130
## 163 MSC MSC_GSM469131
## 164 MSC MSC_GSM469132
## 165 MSC MSC_GSM469136
## 166 Neuro_endo Neuro_endo_GSM469411
## 167 Neuro_endo Neuro_endo_GSM469412
## 168 Vascular Vascular_GSM476782
## 169 Vascular Vascular_GSM476783
## 170 Vascular Vascular_GSM476784
## 171 Vascular Vascular_GSM476785
## 172 Vascular Vascular_GSM476786
## 173 Vascular Vascular_GSM492832
## 174 Vascular Vascular_GSM492833
## 175 SMC SMC_GSM492834
## 176 SMC SMC_GSM492835
## 177 Fibroblasts Fibroblasts_GSM500995
## 178 Bone_soft Bone_soft_GSM501001
## 179 Bone_soft Bone_soft_GSM501002
## 180 Bone_soft Bone_soft_GSM501003
## 181 Fibroblasts Fibroblasts_GSM501890
## 182 Fibroblasts Fibroblasts_GSM501891
## 183 Fibroblasts Fibroblasts_GSM501892
## 184 Fibroblasts Fibroblasts_GSM501893
## 185 Fibroblasts Fibroblasts_GSM501894
## 186 Fibroblasts Fibroblasts_GSM501895
## 187 Neuro_endo Neuro_endo_GSM53382
## 188 Neuro_endo Neuro_endo_GSM53383
## 189 Neuro_endo Neuro_endo_GSM53384
## 190 Neuro_endo Neuro_endo_GSM53385
## 191 Neuro_endo Neuro_endo_GSM53386
## 192 Neuro_endo Neuro_endo_GSM53387
## 193 Vascular Vascular_GSM551183
## 194 Neuro_endo Neuro_endo_GSM92231
## 195 Neuro_endo Neuro_endo_GSM92232
## 196 Neuro_endo Neuro_endo_GSM92233
## 197 Neuro_endo Neuro_endo_GSM92234
## 198 B _B_HLE_liver
## 199 B _B_HLF_liver
## 200 B _B_JHH2_liver
## 201 B _B_JHH4_liver
## 202 B _B_Li7_liver
## 203 B _B_SNU182_liver
## 204 B _B_SNU387_liver
## 205 B _B_SNU423_liver
## 206 B _B_SNU449_liver
## 207 B _B_SNU475_liver
## 208 B _B_SNU761_liver
## 209 B _B_SNU878_liver
## 210 B _B_SNU886_liver
## 211 C _C_JHH1_liver
## 212 C _C_JHH6_liver
## 213 C _C_NCIH684_liver
## 214 C _C_SKHEP1_liver
## 215 C _C_SNU398_liver
rowslider_B <- deg_B$gene_cluster
B_res_ward <- ggheat(df = t(nnn), colslider=rowslider_B ,rowslider=colslider_B, ColV = T,colname_label = F,rowname_label = F,font.size = 14,clst_method = "ward.D2",lmat=lmat, lwid=lwid, lhei = lhei,main = "")
## Warning: Ignoring unknown aesthetics: width, height
grid.draw(B_res_ward$plot_data)
ggsave(plot=B_res_ward$plot_data,filename = "B_limited.tiff",dpi = 300,width = 18,height = 18,units = "cm")
B_res_avg <- ggheat(df = t(nnn), colslider=rowslider_B ,rowslider=colslider_B, ColV = T,colname_label = F,rowname_label = F,font.size = 14,clst_method = "average",lmat=lmat, lwid=lwid, lhei = lhei,main = "")
## Warning: Ignoring unknown aesthetics: width, height
data_new_categ <- list()
categ3 <- list(Blood_cell=c("T_cell","T cell","T cells","CD4 cells","Treg","t_cell",
"Effector memory","Central memory","Naive, donor","B-cells",
"B cells","B cell","Monocyte","monocytes","monopcytes",
"Peripheral blood from healthy human donor",
"macrophages","Macrophages","Erythroblast",
"Bone marrow & progenitors","Myelocytes","MEP cells","GMP cells",
"CMP cells","HSC","Human composite bone marrow","peripheral blood, prior",
"Neutrophils","neutrophils","PMN","centrocyte","centroblast","platelet",
"NK cells","Natural killer cells","Natural Killer cells ",
"Dendritic cells","dendritic cells","MDDC","DCs","Dcs"),
Stromal_cell=c("-defrived mesenchymal stem cells","BM MSC","BM-MSC",
"cell type: mesenchymal stem cells","derived mesenchymal stem cells",
"smooth muscle cells","Smooth Muscle Cells","SMCs","smooth muscle cell",
"Foreskin Cells","normal fibroblast","cell type: fibroblast",
"Human Fibroblast cells","PDB fibroblasts","fibroblasts_",
"Fibroblasts uninfected","Fibroblasts infected",
"osteoblast","chondrocyte","DPSCs","adipocyte","adipose stem cell"),
Neuro_endo=c("Nerve","astrocytes","adrenal medulla"),
Hepatocytes=c("hepatocyte"),
Endothel=c("lymphatic endothelial cells","HUVEC","Vein ECs",
"blood vessel endothelial cell","HMVEC","cell type: Endothelial cells"),
Other=c("bronchial epithelial cells","bladder","keratinocytes"),
ES_iPS_germ=c("ESC","iPS","hIPSC","ES cell","Human Embryonic Stem Cells","embryonic stem cells","Sperm","Oocytes","oocytes")
)
data_new_categ[["categ3"]] <- categ3
#append(data_new_categ, categ3=list(categ3))
sample_info <- data.frame(filename=cels,data_colname=data_colname,id=rowname_cands,stringsAsFactors = F)
sample_info <- merge(sample_info, result_df,by.x = "id", by.y = "geo_accession",sort = F,all.x = T)
sample_info$title <- ifelse(test = is.na(sample_info$title),yes = "",no = sample_info$title)
sample_info$source_name_ch1 <- ifelse(test = is.na(sample_info$source_name_ch1),
yes = "",no = sample_info$source_name_ch1)
sample_info$characteristics_ch1 <- ifelse(test = is.na(sample_info$characteristics_ch1),
yes = "",no = sample_info$characteristics_ch1)
sample_info$colname_tag <- base::paste(sample_info$id, sample_info$title)
sample_info$category <- categolizer(annotation_df = data.frame(sample_info$characteristics_ch1,
sample_info$source_name_ch1,
sample_info$title,stringsAsFactors = F),
dictionaly_list = data_new_categ$categ3)
sample_info$sample_tag <- paste(sample_info$category, sample_info$id, sep = "_")
sample_info$category <- ifelse(sample_info$category=="",str_extract(sample_info$colname_tag,"^[ABC]"),sample_info$category)
data_new_categ[["sample_info"]] <- sample_info
m_re <- log2(mas5_4each)
m_re <- m_re[rownames(m_re) %in% deg$Row.names,]
colnames_temp <- colnames(m_re)
colnames_temp <- str_replace_all(colnames_temp,pattern = "\\.cel\\.gz","")
colnames_temp <- str_replace_all(colnames_temp,pattern = "\\.cel|\\.CEL","")
colnametemp <- for(i in c(1:length(colnames_temp))){
if(str_detect(colnames_temp[i],"^[ABC]")){
colnames_temp[i] <- colnames_temp[i]
}
else if(str_detect(colnames_temp[i], "^GSM")){
colnames_temp[i] <- str_extract(colnames_temp[i], "^GSM[0-9]*")
}
else{
print("unknown condition")
}
}
#colnames_temp
#conv_mat$id
#colnames_temp[!colnames_temp %in% conv_mat$id]
#matrix_in_out = data.frame(conv_mat$id,conv_mat$sample_tag)
colnames_temp <- convertvector(inputvector = colnames_temp,
matrix_in_out = data.frame(sample_info$id, sample_info$sample_tag,stringsAsFactors = F))
colnames(m_re) <- colnames_temp
rm(colnames_temp)
m_re <- m_re[ref_sort(sort_vector = rownames(m_re),ref_vector = deg$Row.names),]
m_re <- m_re[,ref_sort(sort_vector = colnames(m_re),ref_vector = data_new_categ$sample_info$sample_tag)]
# sum(colnames(m_re) %in% sample_info$sample_tag)
# colnames(m_re)[!colnames(m_re) %in% sample_info$sample_tag]
# table(sample_info$category)
data_new_categ[["matrix"]] <- t(m_re)
table(data_new_categ$sample_info$category)
##
## A B Blood_cell C Endothel
## 10 13 409 5 64
## ES_iPS_germ Hepatocytes Neuro_endo Other Stromal_cell
## 63 3 12 41 121
data_new_categ[["rowslider"]] <- data_new_categ$sample_info$category
data_new_categ[["colslider"]] <- deg$gene_cluster
newcol2 <- c(A="#e31a1c",B="#1f78b4",C="#33a02c",
Other="#fdbf6f",Stromal_cell="#6a3d9a",Hepatocytes="#ff7f00",Endothel="#a6cee3",
Neuro_endo="#cab2d6",ES_iPS_germ="#fb9a99",Blood_cell="#b2df8a")
lmat <- rbind(c(7,7,1,1,1,1),
c(7,7,5,1,1,1),
c(7,7,3,1,1,1),
c(6,4,2,9,10,1),
c(1,1,8,1,1,1))
lwid <- c(0.25, 0.1, 1, 0.01,0.5,0.01)
lhei <- c(0.1,0.2,0.1,2,0.01)
gh_new <- ggheat(df = data_new_categ$matrix,clst_method = "ward.D2",dist_method = "spearman",colslider = data_new_categ$colslider, rowslider = data_new_categ$rowslider,colname_label = F, rowname_label = F,rowslider_palette = newcol2,main = "",lmat = lmat, lwid = lwid,lhei = lhei,font.size = 14)
## Warning: Ignoring unknown aesthetics: width, height
grid.draw(gh_new$plot_data)
ggsave(plot = gh_new$plot_data,filename = "ggheat_stroma_emph.tiff",dpi = 300,width = 18,height = 18,units = "cm")
# df = t(m)
# colslider=rowslider
# rowslider=colslider
# ColV = T
# colname_label = F
# font.size = 1
# clst_method="average"
# dist_method="spearman"
ggheat2 <- function(df,
clst_method="average",
dist_method="spearman",
colslider, rowslider,
ColV=T, RowV=T,
colname_label=T, rowname_label=T,
colangle=45, rowangle=45,
colours=c("blue", "white", "red"),
key.axis.fontsize=12,
main="title",
add_p=NULL,
add_p2=NULL,
lmat=NULL,
lhei=NULL,lwid=NULL,
font.size=10,
rowslider_palette=NULL,
rowslider_palette_order=NULL){
require(ggplot2)
require(reshape2)##for melting
require(grid)
require(gridExtra)
require(ggdendro)
require(scales)
##common theme function
theme_ggh <- function(font.size=10,legend.position = "none") {
theme(axis.text.x = element_blank(),
axis.text.y = element_blank(),
axis.title = element_blank(),
axis.line = element_blank(),
axis.ticks = element_blank(),
plot.title = element_blank(),
panel.grid = element_blank(),
panel.border = element_blank(),
panel.spacing = element_blank(),
panel.background = element_blank(),
plot.background = element_blank(),
plot.margin = unit(c(0,0,0,0),"cm"),
text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
legend.position = "none"
)
}
##blank grid for plotting blank
blank_grid <- grid.rect(gp=gpar(col="white"))
df <- as.data.frame(df)
##clustering if needed
cluster_data <- list()
if(ColV==T){
dist_x <- as.dist(1-cor(as.matrix(df),method = dist_method))
clst_x <- hclust(dist_x,method = clst_method)
df <- df[,clst_x$order]
colslider <- colslider[clst_x$order]
cluster_data <- append(cluster_data, list(clst_x))
}
if(RowV==T){
dist_y <- as.dist(1-cor(as.matrix(t(df)),method = dist_method))
clst_y <- hclust(dist_y,method = clst_method)
df <- df[clst_y$order,]
rowslider <- rowslider[clst_y$order]
cluster_data <- append(cluster_data, list(clst_y))
}
##matrix prepareation
colname <- colnames(df)
colname <- data.frame(text=colname, x=c(1:length(colname)),colslider=colslider)
colnames(df) <- c(1:ncol(df))
rowname <- rownames(df)
rowname <- data.frame(text=rowname, y=c(1:length(rowname)),rowslider=rowslider)
rownames(df) <- c(1:nrow(df))
##for rowname_order
rowname[,3] <- factor(x = rowslider, levels = c("A", "Hepatocytes", "B","Stromal_cell", "C", "Blood_cell", "Endothel", "ES_iPS_germ","Neuro_endo", "Other"))
##
tiledata <- melt(as.matrix(df))
##heatmap is p1
p1 <- ggplot()+
geom_tile(data = tiledata, mapping = aes(x=Var2, y = Var1, fill=value))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
scale_fill_gradient2(low = colours[1],mid = colours[2],high = colours[3],midpoint = (max(tiledata$value)+min(tiledata$value))/2)+
guides(fill=F)+
theme_ggh()
#p1
##colslider is cols
cols <- ggplot()+
geom_tile(data=colname,aes(x=x,y=0,fill=colslider))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
theme_ggh()
## scale_fill_identity(guide = "legend")+
#cols
if(!is.null(rowslider_palette)){
add_fill <- function(){return(scale_fill_manual(values = rowslider_palette,name="category"))}
}else{
add_fill <- function(){return(scale_fill_discrete(name="category"))}
}
##rowslider is rows
rows <- ggplot()+
geom_tile(data=rowname,aes(x=0,y=y,fill=rowslider))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
add_fill()+
theme(legend.text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
legend.title =element_text(family = "Arial",size=font.size+2,lineheight = 0.7))
rows_grob <- ggplot_gtable(ggplot_build(rows))
id.legend <- which(sapply(rows_grob$grobs, function(x) x$name)=="guide-box")
rows_legend <- rows_grob$grobs[[id.legend]]
rows <- ggplot()+
geom_tile(data=rowname,aes(x=0,y=y,fill=rowslider))+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
add_fill()+
theme_ggh()
#rows
##col dendrogram if needed
if(ColV==T){
coldend <- as.dendrogram(clst_x)
#plot(coldend)
coldend <- segment(dendro_data(coldend))
cold <- ggplot()+
geom_segment(data=coldend,aes(x=x, y=y, xend=xend, yend=yend))+
scale_x_continuous(expand=c(0,0),limits = c(0.5,max(coldend$xend)+0.5))+
scale_y_continuous(expand=c(0,0))+
theme_ggh()
#cold
}else{
cold <- blank_grid
}
##row dendrogram if needed
if(RowV==T){
rowdend <- as.dendrogram(clst_y)
#plot(rowdend)
rowdend <- segment(dendro_data(rowdend))
rowd <- ggplot()+
geom_segment(data = rowdend,aes(x=x, y=y, xend=xend, yend=yend))+
scale_x_continuous(expand=c(0,0),limits = c(0.5,max(rowdend$xend)+0.5))+
scale_y_reverse(expand=c(0,0))+
theme_ggh()+
coord_flip()
#rowd
}else{
rowd <- blank_grid
}
##key histgram(density plot)
key_hist <- hist(tiledata$value,breaks = 50,plot = F)
max_hist <- max(key_hist$density)
key_density <- data.frame(range=seq(min(tiledata$value)-1, max(tiledata$value)+1, 0.02))
key_density_range <- density(tiledata$value)
key <- ggplot()+
geom_tile(data = key_density,
mapping = aes(x = range, y=max_hist/2*1.2,fill=range,width=0.02, height=max_hist*1.2),
show.legend = F)+
scale_fill_gradient2(low = colours[1],mid = colours[2],high = colours[3],
midpoint = (max(tiledata$value)+min(tiledata$value))/2,
limits=c(max(tiledata$value),min(tiledata$value)),
oob=squish)+
scale_x_continuous(expand=c(0,0))+
scale_y_continuous(expand=c(0,0))+
geom_histogram(data = tiledata,mapping = aes(x=value,y=..density..),
alpha=0.8, binwidth = (max(tiledata$value)-min(tiledata$value))/50)+
guides(fill=F,colour=F)+xlab("")+ylab("")+
theme_classic()+
theme(text = element_text(family = "Arial",size=font.size,lineheight = 0.7),
axis.text.x = element_text(family = "Arial",size=key.axis.fontsize),
axis.text.y = element_text(family = "Arial",size=key.axis.fontsize),
plot.margin = unit(c(0,0,-0.02,-0.015),"native"))
#key
##colnames
if(colname_label==T){
colname_label <- ggplot()+
geom_text(data=colname,mapping = aes(x=x,y=0, label=text,angle=colangle),
size=3,hjust=0)+
scale_x_continuous(expand=c(0,0),limits = c(min(colname$x)-0.5, max(colname$x)+0.5))+
scale_y_continuous(expand=c(0,0),limits = c(0,1))+
theme_ggh(font.size =font.size)
colname_table <- ggplot_gtable(ggplot_build(colname_label))
colname_table$layout$clip[colname_table$layout$name=="panel"] <- "off"
#class(colname_table)
#colname_label
}else{
colname_label <- blank_grid
colname_table <- blank_grid
}
##rownames
if(rowname_label==T){
rowname_label <- ggplot()+
geom_text(data = rowname,mapping = aes(x=0,y=y, label=text,angle=rowangle),
size=3,hjust=0)+
scale_x_continuous(expand=c(0,0),limits = c(0,0.05))+
scale_y_continuous(expand=c(0,0),limits = c(min(rowname$y)-0.5, max(rowname$y)+0.5))+
theme_ggh(font.size =font.size)
rowname_table <- ggplot_gtable(ggplot_build(rowname_label))
rowname_table$layout$clip[rowname_table$layout$name=="panel"] <- "off"
#rowname_label
}else{
rowname_label <- blank_grid
rowname_table <- blank_grid
}
if(!is.null(add_p)){
add <- add_p
}else{
add <- blank_grid
}
#add <- b1
add <- rows_legend
if(is.null(add_p2)){
add_p2 <- blank_grid
}
##layout
if(is.null(lmat) | is.null(lwid) | is.null(lhei)){
lmat <- rbind(c(7,7,1,1,1,11),
c(7,7,5,1,1,1),
c(7,7,3,1,1,1),
c(6,4,2,9,10,1),
c(1,1,8,1,1,1))
lwid <- c(0.2, 0.1, 1, 0.1,0.5,0.01)
lhei <- c(0.1,0.2,0.1,2,0.01)
}
g1 <- grid.arrange(blank_grid,#1
p1,#2
cols,#3
rows,#4
cold,#5
rowd,#6
key,#7
colname_table,#8
rowname_table,#9
add,#10
add_p2,#11
layout_matrix=lmat,heights=lhei, widths=lwid,
top=textGrob(main, gp=gpar(fontsize=20,fontfamily="Arial")))
result_list <- list(plot_data=g1, cluster_data=cluster_data)
return(result_list)
}
row_clst <- gh_new$cluster_data[2][[1]]
row_clst$order[str_detect(row_clst$labels,pattern = "Stroma_cell|_B_")]
## [1] 342 343 345 346 29 44 31 47 30 32 39 43 41
row_clst$labels[row_clst$order]
## [1] "ES_iPS_germ_GSM530604" "ES_iPS_germ_GSM530606"
## [3] "ES_iPS_germ_GSM530601" "ES_iPS_germ_GSM530603"
## [5] "ES_iPS_germ_GSM372156" "ES_iPS_germ_GSM372154"
## [7] "ES_iPS_germ_GSM372155" "ES_iPS_germ_GSM469409"
## [9] "ES_iPS_germ_GSM172866" "ES_iPS_germ_GSM172865"
## [11] "ES_iPS_germ_GSM172870" "ES_iPS_germ_GSM172868"
## [13] "ES_iPS_germ_GSM172867" "ES_iPS_germ_GSM172869"
## [15] "ES_iPS_germ_GSM540716" "ES_iPS_germ_GSM540714"
## [17] "ES_iPS_germ_GSM540715" "ES_iPS_germ_GSM402806"
## [19] "ES_iPS_germ_GSM402717" "ES_iPS_germ_GSM402752"
## [21] "ES_iPS_germ_GSM530611" "_C_SNU398_liver"
## [23] "ES_iPS_germ_GSM501008" "ES_iPS_germ_GSM501007"
## [25] "ES_iPS_germ_GSM501009" "ES_iPS_germ_GSM501004"
## [27] "ES_iPS_germ_GSM501006" "ES_iPS_germ_GSM500996"
## [29] "ES_iPS_germ_GSM500997" "ES_iPS_germ_GSM501000"
## [31] "ES_iPS_germ_GSM500998" "ES_iPS_germ_GSM500999"
## [33] "ES_iPS_germ_GSM347922" "ES_iPS_germ_GSM501005"
## [35] "ES_iPS_germ_GSM378811" "ES_iPS_germ_GSM347917"
## [37] "ES_iPS_germ_GSM347916" "ES_iPS_germ_GSM347918"
## [39] "ES_iPS_germ_GSM347924" "ES_iPS_germ_GSM347923"
## [41] "ES_iPS_germ_GSM347925" "ES_iPS_germ_GSM225042"
## [43] "ES_iPS_germ_GSM230294" "ES_iPS_germ_GSM530602"
## [45] "ES_iPS_germ_GSM530605" "ES_iPS_germ_GSM530607"
## [47] "ES_iPS_germ_GSM372157" "ES_iPS_germ_GSM372159"
## [49] "ES_iPS_germ_GSM367062" "ES_iPS_germ_GSM372158"
## [51] "ES_iPS_germ_GSM367243" "ES_iPS_germ_GSM367244"
## [53] "ES_iPS_germ_GSM367245" "ES_iPS_germ_GSM367258"
## [55] "ES_iPS_germ_GSM367061" "ES_iPS_germ_GSM367241"
## [57] "ES_iPS_germ_GSM367242" "ES_iPS_germ_GSM367219"
## [59] "ES_iPS_germ_GSM367240" "Neuro_endo_GSM53385"
## [61] "Neuro_endo_GSM53386" "Neuro_endo_GSM53382"
## [63] "Neuro_endo_GSM53384" "Neuro_endo_GSM53383"
## [65] "Neuro_endo_GSM53387" "ES_iPS_germ_GSM304262"
## [67] "ES_iPS_germ_GSM304260" "ES_iPS_germ_GSM304261"
## [69] "ES_iPS_germ_GSM158468" "ES_iPS_germ_GSM158470"
## [71] "Other_GSM173542" "Other_GSM173541"
## [73] "Other_GSM173543" "Other_GSM173538"
## [75] "Other_GSM173539" "Other_GSM173546"
## [77] "Other_GSM173544" "Other_GSM173540"
## [79] "Other_GSM173545" "Other_GSM173552"
## [81] "Other_GSM173550" "Other_GSM173551"
## [83] "Other_GSM173535" "Other_GSM173556"
## [85] "Other_GSM173553" "Other_GSM173536"
## [87] "Other_GSM173537" "Other_GSM173554"
## [89] "Other_GSM173555" "Other_GSM173534"
## [91] "Other_GSM173547" "Other_GSM173548"
## [93] "Other_GSM173549" "Other_GSM173532"
## [95] "Other_GSM173533" "Other_GSM119354"
## [97] "Other_GSM119362" "Other_GSM119360"
## [99] "Other_GSM119357" "Other_GSM119359"
## [101] "Other_GSM119361" "Other_GSM119371"
## [103] "Other_GSM119366" "Other_GSM119369"
## [105] "Other_GSM119372" "Other_GSM299096"
## [107] "Other_GSM299095" "Other_GSM299097"
## [109] "Other_GSM299098" "Other_GSM299099"
## [111] "Other_GSM299100" "Endothel_GSM410679"
## [113] "Endothel_GSM410680" "Endothel_GSM410681"
## [115] "Endothel_GSM410678" "Endothel_GSM410666"
## [117] "Endothel_GSM410669" "Endothel_GSM410667"
## [119] "Endothel_GSM410668" "Endothel_GSM410675"
## [121] "Endothel_GSM410684" "Endothel_GSM410673"
## [123] "Endothel_GSM410672" "Endothel_GSM410674"
## [125] "Endothel_GSM410685" "Endothel_GSM410686"
## [127] "Endothel_GSM410687" "Endothel_GSM143898"
## [129] "Endothel_GSM143900" "Endothel_GSM143910"
## [131] "Endothel_GSM143914" "Endothel_GSM143717"
## [133] "Endothel_GSM143907" "Endothel_GSM305787"
## [135] "Endothel_GSM305784" "Endothel_GSM305785"
## [137] "Endothel_GSM476784" "Endothel_GSM476783"
## [139] "Endothel_GSM476786" "Endothel_GSM476782"
## [141] "Endothel_GSM476785" "Endothel_GSM492832"
## [143] "Endothel_GSM492833" "Endothel_GSM141252"
## [145] "Endothel_GSM141253" "Endothel_GSM141251"
## [147] "Endothel_GSM141255" "Endothel_GSM330314"
## [149] "Endothel_GSM143726" "Endothel_GSM335859"
## [151] "Endothel_GSM330313" "Endothel_GSM335393"
## [153] "Endothel_GSM335851" "Endothel_GSM335395"
## [155] "Endothel_GSM385350" "Endothel_GSM385353"
## [157] "Endothel_GSM143727" "Endothel_GSM385333"
## [159] "Endothel_GSM385338" "Endothel_GSM346952"
## [161] "Endothel_GSM346951" "Endothel_GSM551183"
## [163] "Endothel_GSM330315" "Endothel_GSM335904"
## [165] "Endothel_GSM330316" "Endothel_GSM335396"
## [167] "Endothel_GSM335906" "Endothel_GSM336559"
## [169] "Endothel_GSM143729" "Endothel_GSM143728"
## [171] "Endothel_GSM143731" "Endothel_GSM143732"
## [173] "Endothel_GSM143733" "Endothel_GSM143730"
## [175] "Endothel_GSM305786" "Stromal_cell_GSM413842"
## [177] "Stromal_cell_GSM372142" "Stromal_cell_GSM372144"
## [179] "Stromal_cell_GSM372146" "Stromal_cell_GSM366942"
## [181] "Stromal_cell_GSM402707" "Stromal_cell_GSM500995"
## [183] "Stromal_cell_GSM347919" "Stromal_cell_GSM347920"
## [185] "Stromal_cell_GSM501001" "Stromal_cell_GSM501002"
## [187] "Stromal_cell_GSM501003" "Stromal_cell_GSM501890"
## [189] "Stromal_cell_GSM501895" "Stromal_cell_GSM501891"
## [191] "Stromal_cell_GSM501894" "Stromal_cell_GSM501892"
## [193] "Stromal_cell_GSM501893" "Stromal_cell_GSM260309"
## [195] "Stromal_cell_GSM260311" "Stromal_cell_GSM260312"
## [197] "Stromal_cell_GSM260310" "Stromal_cell_GSM260313"
## [199] "Stromal_cell_GSM260305" "Stromal_cell_GSM260306"
## [201] "Stromal_cell_GSM260308" "Stromal_cell_GSM260321"
## [203] "Stromal_cell_GSM260307" "Stromal_cell_GSM260314"
## [205] "Stromal_cell_GSM260322" "Stromal_cell_GSM287219"
## [207] "Stromal_cell_GSM287218" "Stromal_cell_GSM287222"
## [209] "Stromal_cell_GSM287217" "Stromal_cell_GSM287216"
## [211] "Stromal_cell_GSM287220" "Stromal_cell_GSM239260"
## [213] "Stromal_cell_GSM239379" "Stromal_cell_GSM239457"
## [215] "Stromal_cell_GSM239606" "Stromal_cell_GSM239612"
## [217] "Stromal_cell_GSM239613" "Stromal_cell_GSM239668"
## [219] "Stromal_cell_GSM239616" "Stromal_cell_GSM239669"
## [221] "Stromal_cell_GSM413847" "Stromal_cell_GSM413846"
## [223] "Stromal_cell_GSM413848" "Stromal_cell_GSM260669"
## [225] "Stromal_cell_GSM260672" "Stromal_cell_GSM260671"
## [227] "Stromal_cell_GSM260670" "Stromal_cell_GSM260673"
## [229] "Stromal_cell_GSM260682" "Stromal_cell_GSM260685"
## [231] "Stromal_cell_GSM260674" "Stromal_cell_GSM260684"
## [233] "Stromal_cell_GSM260666" "Stromal_cell_GSM260665"
## [235] "Stromal_cell_GSM260663" "Stromal_cell_GSM260668"
## [237] "Stromal_cell_GSM260664" "Stromal_cell_GSM260675"
## [239] "Stromal_cell_GSM260681" "Stromal_cell_GSM260667"
## [241] "Stromal_cell_GSM260678" "Stromal_cell_GSM260676"
## [243] "Stromal_cell_GSM260679" "Stromal_cell_GSM260686"
## [245] "Stromal_cell_GSM260680" "Stromal_cell_GSM260683"
## [247] "Stromal_cell_GSM451153" "Stromal_cell_GSM451156"
## [249] "Stromal_cell_GSM260661" "Stromal_cell_GSM260662"
## [251] "Stromal_cell_GSM250019" "Stromal_cell_GSM260657"
## [253] "Stromal_cell_GSM451154" "Stromal_cell_GSM451157"
## [255] "Stromal_cell_GSM451158" "Stromal_cell_GSM250020"
## [257] "Stromal_cell_GSM260658" "Stromal_cell_GSM250021"
## [259] "Stromal_cell_GSM260659" "Stromal_cell_GSM451155"
## [261] "Stromal_cell_GSM451160" "Stromal_cell_GSM451161"
## [263] "_B_Li7_liver" "_B_SNU878_liver"
## [265] "Stromal_cell_GSM346959" "Stromal_cell_GSM346960"
## [267] "Stromal_cell_GSM116106" "Stromal_cell_GSM116103"
## [269] "Stromal_cell_GSM116101" "Stromal_cell_GSM116102"
## [271] "Stromal_cell_GSM116104" "Stromal_cell_GSM116105"
## [273] "Stromal_cell_GSM346941" "Stromal_cell_GSM346942"
## [275] "Stromal_cell_GSM492834" "Stromal_cell_GSM492835"
## [277] "Stromal_cell_GSM322374" "Stromal_cell_GSM322375"
## [279] "Stromal_cell_GSM322376" "Stromal_cell_GSM322377"
## [281] "Stromal_cell_GSM413840" "Stromal_cell_GSM469126"
## [283] "Stromal_cell_GSM469130" "Stromal_cell_GSM469127"
## [285] "Stromal_cell_GSM469128" "Stromal_cell_GSM469129"
## [287] "Stromal_cell_GSM346944" "Stromal_cell_GSM469125"
## [289] "Stromal_cell_GSM346943" "Stromal_cell_GSM469132"
## [291] "Stromal_cell_GSM469131" "Stromal_cell_GSM469136"
## [293] "Stromal_cell_GSM265498" "Stromal_cell_GSM265494"
## [295] "Stromal_cell_GSM265496" "Stromal_cell_GSM265495"
## [297] "Stromal_cell_GSM265497" "Stromal_cell_GSM265499"
## [299] "Neuro_endo_GSM92232" "Neuro_endo_GSM92234"
## [301] "Neuro_endo_GSM92231" "Neuro_endo_GSM92233"
## [303] "Neuro_endo_GSM469411" "Neuro_endo_GSM469412"
## [305] "_B_SNU761_liver" "_C_SKHEP1_liver"
## [307] "_B_SNU182_liver" "_B_SNU449_liver"
## [309] "_B_HLE_liver" "_B_HLF_liver"
## [311] "_B_SNU475_liver" "_B_SNU886_liver"
## [313] "_B_JHH4_liver" "_B_SNU387_liver"
## [315] "_B_SNU423_liver" "_B_JHH2_liver"
## [317] "_C_JHH6_liver" "Hepatocytes_GSM456350"
## [319] "Hepatocytes_GSM456349" "Hepatocytes_GSM456351"
## [321] "_A_Alexander cells_liver" "_A_PLC_PRF_5_liver"
## [323] "_A_HuH6_liver" "_A_huH1_liver"
## [325] "_A_HuH7_liver" "_A_JHH5_liver"
## [327] "_A_JHH7_liver" "_A_Hep 3B2.17_liver"
## [329] "_A_C3A_liver" "_A_Hep G2_liver"
## [331] "_C_JHH1_liver" "Blood_cell_GSM359754"
## [333] "Blood_cell_GSM359760" "Blood_cell_GSM359758"
## [335] "Blood_cell_GSM359753" "Blood_cell_GSM359759"
## [337] "Blood_cell_GSM359332" "Blood_cell_GSM359755"
## [339] "Blood_cell_GSM300401" "Blood_cell_GSM300399"
## [341] "Blood_cell_GSM300403" "Blood_cell_GSM300404"
## [343] "Blood_cell_GSM300392" "Blood_cell_GSM300394"
## [345] "Blood_cell_GSM300398" "Blood_cell_GSM300393"
## [347] "Blood_cell_GSM300402" "Blood_cell_GSM300390"
## [349] "Blood_cell_GSM300389" "Blood_cell_GSM300395"
## [351] "Blood_cell_GSM514672" "Blood_cell_GSM514670"
## [353] "Blood_cell_GSM514669" "Blood_cell_GSM343806"
## [355] "Blood_cell_GSM343822" "Blood_cell_GSM343824"
## [357] "Blood_cell_GSM514671" "Blood_cell_GSM343817"
## [359] "Blood_cell_GSM343819" "Blood_cell_GSM343815"
## [361] "Blood_cell_GSM343805" "Blood_cell_GSM343831"
## [363] "Blood_cell_GSM343807" "Blood_cell_GSM343813"
## [365] "Blood_cell_GSM343825" "Blood_cell_GSM343811"
## [367] "Blood_cell_GSM343829" "Blood_cell_GSM343808"
## [369] "Blood_cell_GSM343810" "Blood_cell_GSM343812"
## [371] "Blood_cell_GSM419989" "Blood_cell_GSM343828"
## [373] "Blood_cell_GSM343830" "Blood_cell_GSM343816"
## [375] "Blood_cell_GSM343818" "Blood_cell_GSM419988"
## [377] "Blood_cell_GSM343802" "Blood_cell_GSM343804"
## [379] "Blood_cell_GSM419992" "Blood_cell_GSM419987"
## [381] "Blood_cell_GSM419990" "Blood_cell_GSM419991"
## [383] "Blood_cell_GSM343821" "Blood_cell_GSM343809"
## [385] "Blood_cell_GSM343814" "Blood_cell_GSM343826"
## [387] "Blood_cell_GSM343803" "Blood_cell_GSM343827"
## [389] "Blood_cell_GSM343820" "Blood_cell_GSM343823"
## [391] "Blood_cell_GSM132924" "Blood_cell_GSM132926"
## [393] "Blood_cell_GSM132928" "Blood_cell_GSM132927"
## [395] "Blood_cell_GSM132919" "Blood_cell_GSM132923"
## [397] "Blood_cell_GSM132925" "Blood_cell_GSM132921"
## [399] "Blood_cell_GSM132922" "Blood_cell_GSM132929"
## [401] "Blood_cell_GSM132930" "Blood_cell_GSM181930"
## [403] "Blood_cell_GSM181971" "Blood_cell_GSM181973"
## [405] "Blood_cell_GSM181982" "Blood_cell_GSM181997"
## [407] "Blood_cell_GSM181931" "Blood_cell_GSM181933"
## [409] "Blood_cell_GSM181857" "Blood_cell_GSM181978"
## [411] "Blood_cell_GSM140953" "Blood_cell_GSM160534"
## [413] "Blood_cell_GSM140968" "Blood_cell_GSM140969"
## [415] "Blood_cell_GSM286088" "Blood_cell_GSM320546"
## [417] "Blood_cell_GSM320544" "Blood_cell_GSM320548"
## [419] "Blood_cell_GSM320550" "Blood_cell_GSM320552"
## [421] "Blood_cell_GSM320545" "Blood_cell_GSM320551"
## [423] "Blood_cell_GSM320547" "Blood_cell_GSM320549"
## [425] "Blood_cell_GSM140973" "Blood_cell_GSM320543"
## [427] "Blood_cell_GSM183305" "Blood_cell_GSM183393"
## [429] "Blood_cell_GSM183482" "Blood_cell_GSM183467"
## [431] "Blood_cell_GSM183392" "Blood_cell_GSM183466"
## [433] "Blood_cell_GSM183316" "Blood_cell_GSM183463"
## [435] "Blood_cell_GSM183394" "Blood_cell_GSM183462"
## [437] "Blood_cell_GSM183306" "Blood_cell_GSM183217"
## [439] "Blood_cell_GSM183315" "Blood_cell_GSM183464"
## [441] "Blood_cell_GSM183465" "Blood_cell_GSM183487"
## [443] "Blood_cell_GSM183209" "Blood_cell_GSM183165"
## [445] "Blood_cell_GSM183486" "Blood_cell_GSM183196"
## [447] "Blood_cell_GSM183483" "Blood_cell_GSM183485"
## [449] "Blood_cell_GSM183193" "Blood_cell_GSM183201"
## [451] "Blood_cell_GSM183484" "Blood_cell_GSM112670"
## [453] "Blood_cell_GSM112490" "Blood_cell_GSM112668"
## [455] "Blood_cell_GSM112540" "Blood_cell_GSM112491"
## [457] "Blood_cell_GSM112669" "Blood_cell_GSM160530"
## [459] "Blood_cell_GSM112664" "Blood_cell_GSM112666"
## [461] "Blood_cell_GSM112661" "Blood_cell_GSM112665"
## [463] "Blood_cell_GSM305433" "Blood_cell_GSM305435"
## [465] "Blood_cell_GSM305441" "Blood_cell_GSM305442"
## [467] "Blood_cell_GSM305437" "Blood_cell_GSM305439"
## [469] "Blood_cell_GSM182000" "Blood_cell_GSM182002"
## [471] "Blood_cell_GSM556663" "Blood_cell_GSM556665"
## [473] "Blood_cell_GSM286091" "Blood_cell_GSM286089"
## [475] "Blood_cell_GSM286090" "Blood_cell_GSM286017"
## [477] "Blood_cell_GSM286086" "Blood_cell_GSM286087"
## [479] "Blood_cell_GSM112541" "Blood_cell_GSM260694"
## [481] "Blood_cell_GSM260695" "Blood_cell_GSM260691"
## [483] "Blood_cell_GSM260692" "Blood_cell_GSM260689"
## [485] "Blood_cell_GSM260697" "Blood_cell_GSM260699"
## [487] "Blood_cell_GSM260693" "Blood_cell_GSM260690"
## [489] "Blood_cell_GSM260696" "Blood_cell_GSM260701"
## [491] "Blood_cell_GSM260698" "Blood_cell_GSM260700"
## [493] "Blood_cell_GSM181974" "Blood_cell_GSM181976"
## [495] "Blood_cell_GSM181981" "Blood_cell_GSM181984"
## [497] "Blood_cell_GSM181999" "Blood_cell_GSM299559"
## [499] "Blood_cell_GSM299560" "Blood_cell_GSM299565"
## [501] "Blood_cell_GSM160532" "Blood_cell_GSM299564"
## [503] "Blood_cell_GSM140970" "Blood_cell_GSM286015"
## [505] "Blood_cell_GSM112667" "Blood_cell_GSM140971"
## [507] "Blood_cell_GSM181972" "Blood_cell_GSM264757"
## [509] "Blood_cell_GSM264758" "Blood_cell_GSM264755"
## [511] "Blood_cell_GSM264756" "Blood_cell_GSM160536"
## [513] "Blood_cell_GSM181983" "Blood_cell_GSM181998"
## [515] "Blood_cell_GSM181980" "Blood_cell_GSM182001"
## [517] "Blood_cell_GSM549579" "Blood_cell_GSM549577"
## [519] "Blood_cell_GSM549578" "Blood_cell_GSM549581"
## [521] "Blood_cell_GSM549580" "Blood_cell_GSM549583"
## [523] "Blood_cell_GSM549582" "Blood_cell_GSM549584"
## [525] "Blood_cell_GSM361278" "Blood_cell_GSM361266"
## [527] "Blood_cell_GSM361272" "Blood_cell_GSM361283"
## [529] "Blood_cell_GSM361285" "Blood_cell_GSM466518"
## [531] "Blood_cell_GSM466519" "Blood_cell_GSM466515"
## [533] "Blood_cell_GSM466516" "Blood_cell_GSM466517"
## [535] "_C_NCIH684_liver" "Blood_cell_GSM289612"
## [537] "Blood_cell_GSM289618" "Blood_cell_GSM289615"
## [539] "Blood_cell_GSM289617" "Blood_cell_GSM289616"
## [541] "Blood_cell_GSM289613" "Blood_cell_GSM289614"
## [543] "Blood_cell_GSM483483" "Blood_cell_GSM483484"
## [545] "Blood_cell_GSM483485" "Blood_cell_GSM483480"
## [547] "Blood_cell_GSM483481" "Blood_cell_GSM483482"
## [549] "Blood_cell_GSM488980" "Blood_cell_GSM488981"
## [551] "Blood_cell_GSM488970" "Blood_cell_GSM488971"
## [553] "Blood_cell_GSM488968" "Blood_cell_GSM488969"
## [555] "Blood_cell_GSM488982" "Blood_cell_GSM488983"
## [557] "Blood_cell_GSM488974" "Blood_cell_GSM488975"
## [559] "Blood_cell_GSM189447" "Blood_cell_GSM189448"
## [561] "Blood_cell_GSM189452" "Blood_cell_GSM189454"
## [563] "Blood_cell_GSM189451" "Blood_cell_GSM189453"
## [565] "Blood_cell_GSM189449" "Blood_cell_GSM189450"
## [567] "Blood_cell_GSM305432" "Blood_cell_GSM305436"
## [569] "Blood_cell_GSM305430" "Blood_cell_GSM305434"
## [571] "Blood_cell_GSM182003" "Blood_cell_GSM182004"
## [573] "Blood_cell_GSM181932" "Blood_cell_GSM181934"
## [575] "Blood_cell_GSM299557" "Blood_cell_GSM299558"
## [577] "Blood_cell_GSM305438" "Blood_cell_GSM299563"
## [579] "Blood_cell_GSM299562" "Blood_cell_GSM305440"
## [581] "Blood_cell_GSM422113" "Blood_cell_GSM422114"
## [583] "Blood_cell_GSM422116" "Blood_cell_GSM422111"
## [585] "Blood_cell_GSM422112" "Blood_cell_GSM422110"
## [587] "Blood_cell_GSM140244" "Blood_cell_GSM422109"
## [589] "Blood_cell_GSM1209586" "Blood_cell_GSM1209588"
## [591] "Blood_cell_GSM1209589" "Blood_cell_GSM1209585"
## [593] "Blood_cell_GSM1209587" "Blood_cell_GSM1209560"
## [595] "Blood_cell_GSM1209558" "Blood_cell_GSM1209559"
## [597] "Blood_cell_GSM140245" "Blood_cell_GSM140248"
## [599] "Blood_cell_GSM140249" "Blood_cell_GSM178554"
## [601] "Blood_cell_GSM178555" "Blood_cell_GSM140246"
## [603] "Blood_cell_GSM140247" "Blood_cell_GSM178550"
## [605] "Blood_cell_GSM178551" "Blood_cell_GSM178557"
## [607] "Blood_cell_GSM488978" "Blood_cell_GSM178549"
## [609] "Blood_cell_GSM178552" "Blood_cell_GSM178553"
## [611] "Blood_cell_GSM488979" "Blood_cell_GSM178558"
## [613] "Blood_cell_GSM299561" "Blood_cell_GSM178556"
## [615] "Blood_cell_GSM299556" "Blood_cell_GSM432176"
## [617] "Blood_cell_GSM350084" "Blood_cell_GSM350085"
## [619] "Blood_cell_GSM350086" "Blood_cell_GSM432180"
## [621] "Blood_cell_GSM432178" "Blood_cell_GSM432179"
## [623] "Blood_cell_GSM432175" "Blood_cell_GSM432177"
## [625] "Blood_cell_GSM556647" "Blood_cell_GSM488976"
## [627] "Blood_cell_GSM488977" "Blood_cell_GSM1209591"
## [629] "Blood_cell_GSM1209595" "Blood_cell_GSM1209594"
## [631] "Blood_cell_GSM1209592" "Blood_cell_GSM1209593"
## [633] "Blood_cell_GSM1209598" "Blood_cell_GSM1209597"
## [635] "Blood_cell_GSM1209596" "Blood_cell_GSM1209599"
## [637] "Blood_cell_GSM279574" "Blood_cell_GSM279580"
## [639] "Blood_cell_GSM279577" "Blood_cell_GSM279578"
## [641] "Blood_cell_GSM279581" "Blood_cell_GSM279582"
## [643] "Blood_cell_GSM279575" "Blood_cell_GSM279576"
## [645] "Blood_cell_GSM279572" "Blood_cell_GSM279573"
## [647] "Blood_cell_GSM279583" "Blood_cell_GSM279579"
## [649] "Blood_cell_GSM279584" "Blood_cell_GSM372813"
## [651] "Blood_cell_GSM372804" "Blood_cell_GSM372803"
## [653] "Blood_cell_GSM372810" "Blood_cell_GSM372816"
## [655] "Blood_cell_GSM372818" "Blood_cell_GSM372800"
## [657] "Blood_cell_GSM372809" "Blood_cell_GSM372811"
## [659] "Blood_cell_GSM372808" "Blood_cell_GSM372817"
## [661] "Blood_cell_GSM372806" "Blood_cell_GSM372807"
## [663] "Blood_cell_GSM372801" "Blood_cell_GSM372802"
## [665] "Blood_cell_GSM372812" "Blood_cell_GSM372805"
## [667] "Blood_cell_GSM372814" "Blood_cell_GSM372815"
## [669] "Blood_cell_GSM1209577" "Blood_cell_GSM1209580"
## [671] "Blood_cell_GSM1209578" "Blood_cell_GSM1209579"
## [673] "Blood_cell_GSM1209582" "Blood_cell_GSM1209561"
## [675] "Blood_cell_GSM1209576" "Blood_cell_GSM1209563"
## [677] "Blood_cell_GSM1209573" "Blood_cell_GSM1209562"
## [679] "Blood_cell_GSM1209583" "Blood_cell_GSM1209575"
## [681] "Blood_cell_GSM1209581" "Blood_cell_GSM1209574"
## [683] "Blood_cell_GSM1209584" "Blood_cell_GSM153893"
## [685] "Blood_cell_GSM154073" "Blood_cell_GSM154084"
## [687] "Blood_cell_GSM154077" "Blood_cell_GSM154078"
## [689] "Blood_cell_GSM154081" "Blood_cell_GSM547998"
## [691] "Blood_cell_GSM548000" "Blood_cell_GSM547999"
## [693] "Blood_cell_GSM548001" "Blood_cell_GSM542578"
## [695] "Blood_cell_GSM349848" "Blood_cell_GSM349849"
## [697] "Blood_cell_GSM310429" "Blood_cell_GSM198944"
## [699] "Blood_cell_GSM198945" "Blood_cell_GSM198942"
## [701] "Blood_cell_GSM198943" "Blood_cell_GSM381341"
## [703] "Blood_cell_GSM381343" "Blood_cell_GSM381339"
## [705] "Blood_cell_GSM381345" "Blood_cell_GSM381340"
## [707] "Blood_cell_GSM381346" "Blood_cell_GSM381342"
## [709] "Blood_cell_GSM381344" "Blood_cell_GSM310440"
## [711] "Blood_cell_GSM488972" "Blood_cell_GSM488973"
## [713] "Blood_cell_GSM310431" "Blood_cell_GSM310437"
## [715] "Blood_cell_GSM310439" "Blood_cell_GSM310432"
## [717] "Blood_cell_GSM310436" "Blood_cell_GSM310433"
## [719] "Blood_cell_GSM310434" "Blood_cell_GSM310435"
## [721] "Blood_cell_GSM310430" "Blood_cell_GSM310438"
## [723] "Blood_cell_GSM290420" "Blood_cell_GSM290414"
## [725] "Blood_cell_GSM290415" "Blood_cell_GSM290421"
## [727] "Blood_cell_GSM290423" "Blood_cell_GSM1209554"
## [729] "Blood_cell_GSM1209569" "Blood_cell_GSM1209556"
## [731] "Blood_cell_GSM1209572" "Blood_cell_GSM1209555"
## [733] "Blood_cell_GSM1209557" "Blood_cell_GSM1209564"
## [735] "Blood_cell_GSM1209568" "Blood_cell_GSM1209566"
## [737] "Blood_cell_GSM1209570" "Blood_cell_GSM1209567"
## [739] "Blood_cell_GSM1209590" "Blood_cell_GSM1209565"
## [741] "Blood_cell_GSM1209571"
row_clst$order
## [1] 679 681 676 678 512 510 511 617 129 128 133 131 130 132 692 690 691
## [18] 551 549 550 683 741 664 663 665 660 662 652 653 656 654 655 475 661
## [35] 535 471 470 472 477 476 478 231 232 677 680 682 513 515 498 514 503
## [52] 504 505 506 497 501 502 499 500 687 688 684 686 685 689 377 375 376
## [69] 122 123 144 143 145 140 141 148 146 142 147 154 152 153 137 158 155
## [86] 138 139 156 157 136 149 150 151 134 135 19 24 22 20 21 23 27
## [103] 25 26 28 348 347 349 350 351 352 561 562 563 560 552 555 553 554
## [120] 559 564 557 556 558 565 566 567 111 112 114 115 102 113 393 390 391
## [137] 622 621 624 620 623 647 648 99 100 98 101 421 103 428 420 424 427
## [154] 425 546 547 104 544 545 467 466 706 422 429 423 426 430 431 106 105
## [171] 108 109 110 107 392 569 507 508 509 496 548 651 473 474 657 658 659
## [188] 666 671 667 670 668 669 249 251 252 250 253 245 246 248 255 247 254
## [205] 256 332 331 334 330 329 333 233 234 235 236 237 238 240 239 241 571
## [222] 570 572 268 271 270 269 272 280 283 273 282 265 264 262 267 263 274
## [239] 279 266 276 275 277 284 278 281 592 595 260 261 242 257 593 596 597
## [256] 243 258 244 259 594 598 599 728 735 468 469 18 15 13 14 16 17
## [273] 462 463 649 650 416 417 418 419 568 609 613 610 611 612 465 608 464
## [290] 615 614 616 306 302 304 303 305 307 711 713 710 712 618 619 734 740
## [307] 729 732 724 725 733 736 727 730 731 726 738 601 600 602 714 723 719
## [324] 718 720 721 722 716 715 717 737 486 490 488 485 489 484 487 371 370
## [341] 373 374 365 367 369 366 372 364 363 368 675 673 672 436 452 454 674
## [358] 447 449 445 435 461 437 443 455 441 459 438 440 442 575 458 460 446
## [375] 448 574 432 434 578 573 576 577 451 439 444 456 433 457 450 453 79
## [392] 81 83 82 75 78 80 76 77 84 85 170 175 177 183 186 171 173
## [409] 169 180 92 126 93 94 325 409 407 411 413 415 408 414 410 412 97
## [426] 406 200 205 213 212 204 211 203 208 206 207 201 199 202 209 210 218
## [443] 198 194 217 196 214 216 195 197 215 12 1 10 3 2 11 124 6
## [460] 8 5 7 380 382 388 389 384 386 189 191 708 709 328 326 327 322
## [477] 323 324 4 290 291 287 288 285 293 295 289 286 292 297 294 296 178
## [494] 179 182 185 188 356 357 362 125 361 95 321 9 96 176 300 301 298
## [511] 299 127 184 187 181 190 700 698 699 702 701 704 703 705 493 491 492
## [528] 494 495 606 607 603 604 605 739 335 341 338 340 339 336 337 628 629
## [545] 630 625 626 627 643 644 633 634 631 632 645 646 637 638 219 220 224
## [562] 226 223 225 221 222 379 383 378 381 192 193 172 174 354 355 385 360
## [579] 359 387 583 584 585 581 582 580 86 579 61 63 64 60 62 35 33
## [596] 34 87 90 91 164 165 88 89 160 161 167 641 159 162 163 642 168
## [613] 358 166 353 587 481 482 483 591 589 590 586 588 707 639 640 66 70
## [630] 69 67 68 73 72 71 74 310 316 313 314 317 318 311 312 308 309
## [647] 319 315 320 529 520 519 526 532 534 516 525 527 524 533 522 523 517
## [664] 518 528 521 530 531 52 55 53 54 57 36 51 38 48 37 58 50
## [681] 56 49 59 116 117 121 118 119 120 694 696 695 697 693 479 480 394
## [698] 229 230 227 228 538 540 536 542 537 543 539 541 405 635 636 396 402
## [715] 404 397 401 398 399 400 395 403 344 342 343 345 346 29 44 31 47
## [732] 30 32 39 43 41 45 42 65 40 46
cutree(row_clst, k = 10)
## Blood_cell_GSM112490 Blood_cell_GSM112491 Blood_cell_GSM112540
## 1 1 1
## Blood_cell_GSM112541 Blood_cell_GSM112661 Blood_cell_GSM112664
## 1 1 1
## Blood_cell_GSM112665 Blood_cell_GSM112666 Blood_cell_GSM112667
## 1 1 1
## Blood_cell_GSM112668 Blood_cell_GSM112669 Blood_cell_GSM112670
## 1 1 1
## Stromal_cell_GSM116101 Stromal_cell_GSM116102 Stromal_cell_GSM116103
## 2 2 2
## Stromal_cell_GSM116104 Stromal_cell_GSM116105 Stromal_cell_GSM116106
## 2 2 2
## Other_GSM119354 Other_GSM119357 Other_GSM119359
## 3 3 3
## Other_GSM119360 Other_GSM119361 Other_GSM119362
## 3 3 3
## Other_GSM119366 Other_GSM119369 Other_GSM119371
## 3 3 3
## Other_GSM119372 Blood_cell_GSM1209554 Blood_cell_GSM1209555
## 3 4 4
## Blood_cell_GSM1209556 Blood_cell_GSM1209557 Blood_cell_GSM1209558
## 4 4 5
## Blood_cell_GSM1209559 Blood_cell_GSM1209560 Blood_cell_GSM1209561
## 5 5 4
## Blood_cell_GSM1209562 Blood_cell_GSM1209563 Blood_cell_GSM1209564
## 4 4 4
## Blood_cell_GSM1209565 Blood_cell_GSM1209566 Blood_cell_GSM1209567
## 4 4 4
## Blood_cell_GSM1209568 Blood_cell_GSM1209569 Blood_cell_GSM1209570
## 4 4 4
## Blood_cell_GSM1209571 Blood_cell_GSM1209572 Blood_cell_GSM1209573
## 4 4 4
## Blood_cell_GSM1209574 Blood_cell_GSM1209575 Blood_cell_GSM1209576
## 4 4 4
## Blood_cell_GSM1209577 Blood_cell_GSM1209578 Blood_cell_GSM1209579
## 4 4 4
## Blood_cell_GSM1209580 Blood_cell_GSM1209581 Blood_cell_GSM1209582
## 4 4 4
## Blood_cell_GSM1209583 Blood_cell_GSM1209584 Blood_cell_GSM1209585
## 4 4 5
## Blood_cell_GSM1209586 Blood_cell_GSM1209587 Blood_cell_GSM1209588
## 5 5 5
## Blood_cell_GSM1209589 Blood_cell_GSM1209590 Blood_cell_GSM1209591
## 5 4 6
## Blood_cell_GSM1209592 Blood_cell_GSM1209593 Blood_cell_GSM1209594
## 6 6 6
## Blood_cell_GSM1209595 Blood_cell_GSM1209596 Blood_cell_GSM1209597
## 6 6 6
## Blood_cell_GSM1209598 Blood_cell_GSM1209599 Blood_cell_GSM132919
## 6 6 1
## Blood_cell_GSM132921 Blood_cell_GSM132922 Blood_cell_GSM132923
## 1 1 1
## Blood_cell_GSM132924 Blood_cell_GSM132925 Blood_cell_GSM132926
## 1 1 1
## Blood_cell_GSM132927 Blood_cell_GSM132928 Blood_cell_GSM132929
## 1 1 1
## Blood_cell_GSM132930 Blood_cell_GSM140244 Blood_cell_GSM140245
## 1 5 5
## Blood_cell_GSM140246 Blood_cell_GSM140247 Blood_cell_GSM140248
## 5 5 5
## Blood_cell_GSM140249 Blood_cell_GSM140953 Blood_cell_GSM140968
## 5 1 1
## Blood_cell_GSM140969 Blood_cell_GSM140970 Blood_cell_GSM140971
## 1 1 1
## Blood_cell_GSM140973 Endothel_GSM141251 Endothel_GSM141252
## 1 7 7
## Endothel_GSM141253 Endothel_GSM141255 Endothel_GSM143717
## 7 7 7
## Endothel_GSM143726 Endothel_GSM143727 Endothel_GSM143728
## 7 7 7
## Endothel_GSM143729 Endothel_GSM143730 Endothel_GSM143731
## 7 7 7
## Endothel_GSM143732 Endothel_GSM143733 Endothel_GSM143898
## 7 7 7
## Endothel_GSM143900 Endothel_GSM143907 Endothel_GSM143910
## 7 7 7
## Endothel_GSM143914 Blood_cell_GSM153893 Blood_cell_GSM154073
## 7 4 4
## Blood_cell_GSM154077 Blood_cell_GSM154078 Blood_cell_GSM154081
## 4 4 4
## Blood_cell_GSM154084 ES_iPS_germ_GSM158468 ES_iPS_germ_GSM158470
## 4 8 8
## Blood_cell_GSM160530 Blood_cell_GSM160532 Blood_cell_GSM160534
## 1 1 1
## Blood_cell_GSM160536 ES_iPS_germ_GSM172865 ES_iPS_germ_GSM172866
## 1 9 9
## ES_iPS_germ_GSM172867 ES_iPS_germ_GSM172868 ES_iPS_germ_GSM172869
## 9 9 9
## ES_iPS_germ_GSM172870 Other_GSM173532 Other_GSM173533
## 9 3 3
## Other_GSM173534 Other_GSM173535 Other_GSM173536
## 3 3 3
## Other_GSM173537 Other_GSM173538 Other_GSM173539
## 3 3 3
## Other_GSM173540 Other_GSM173541 Other_GSM173542
## 3 3 3
## Other_GSM173543 Other_GSM173544 Other_GSM173545
## 3 3 3
## Other_GSM173546 Other_GSM173547 Other_GSM173548
## 3 3 3
## Other_GSM173549 Other_GSM173550 Other_GSM173551
## 3 3 3
## Other_GSM173552 Other_GSM173553 Other_GSM173554
## 3 3 3
## Other_GSM173555 Other_GSM173556 Blood_cell_GSM178549
## 3 3 5
## Blood_cell_GSM178550 Blood_cell_GSM178551 Blood_cell_GSM178552
## 5 5 5
## Blood_cell_GSM178553 Blood_cell_GSM178554 Blood_cell_GSM178555
## 5 5 5
## Blood_cell_GSM178556 Blood_cell_GSM178557 Blood_cell_GSM178558
## 5 5 5
## Blood_cell_GSM181857 Blood_cell_GSM181930 Blood_cell_GSM181931
## 1 1 1
## Blood_cell_GSM181932 Blood_cell_GSM181933 Blood_cell_GSM181934
## 5 1 5
## Blood_cell_GSM181971 Blood_cell_GSM181972 Blood_cell_GSM181973
## 1 1 1
## Blood_cell_GSM181974 Blood_cell_GSM181976 Blood_cell_GSM181978
## 1 1 1
## Blood_cell_GSM181980 Blood_cell_GSM181981 Blood_cell_GSM181982
## 1 1 1
## Blood_cell_GSM181983 Blood_cell_GSM181984 Blood_cell_GSM181997
## 1 1 1
## Blood_cell_GSM181998 Blood_cell_GSM181999 Blood_cell_GSM182000
## 1 1 1
## Blood_cell_GSM182001 Blood_cell_GSM182002 Blood_cell_GSM182003
## 1 1 5
## Blood_cell_GSM182004 Blood_cell_GSM183165 Blood_cell_GSM183193
## 5 1 1
## Blood_cell_GSM183196 Blood_cell_GSM183201 Blood_cell_GSM183209
## 1 1 1
## Blood_cell_GSM183217 Blood_cell_GSM183305 Blood_cell_GSM183306
## 1 1 1
## Blood_cell_GSM183315 Blood_cell_GSM183316 Blood_cell_GSM183392
## 1 1 1
## Blood_cell_GSM183393 Blood_cell_GSM183394 Blood_cell_GSM183462
## 1 1 1
## Blood_cell_GSM183463 Blood_cell_GSM183464 Blood_cell_GSM183465
## 1 1 1
## Blood_cell_GSM183466 Blood_cell_GSM183467 Blood_cell_GSM183482
## 1 1 1
## Blood_cell_GSM183483 Blood_cell_GSM183484 Blood_cell_GSM183485
## 1 1 1
## Blood_cell_GSM183486 Blood_cell_GSM183487 Blood_cell_GSM189447
## 1 1 5
## Blood_cell_GSM189448 Blood_cell_GSM189449 Blood_cell_GSM189450
## 5 5 5
## Blood_cell_GSM189451 Blood_cell_GSM189452 Blood_cell_GSM189453
## 5 5 5
## Blood_cell_GSM189454 Blood_cell_GSM198942 Blood_cell_GSM198943
## 5 4 4
## Blood_cell_GSM198944 Blood_cell_GSM198945 ES_iPS_germ_GSM225042
## 4 4 9
## ES_iPS_germ_GSM230294 Stromal_cell_GSM239260 Stromal_cell_GSM239379
## 9 2 2
## Stromal_cell_GSM239457 Stromal_cell_GSM239606 Stromal_cell_GSM239612
## 2 2 2
## Stromal_cell_GSM239613 Stromal_cell_GSM239616 Stromal_cell_GSM239668
## 2 2 2
## Stromal_cell_GSM239669 Stromal_cell_GSM250019 Stromal_cell_GSM250020
## 2 2 2
## Stromal_cell_GSM250021 Stromal_cell_GSM260305 Stromal_cell_GSM260306
## 2 2 2
## Stromal_cell_GSM260307 Stromal_cell_GSM260308 Stromal_cell_GSM260309
## 2 2 2
## Stromal_cell_GSM260310 Stromal_cell_GSM260311 Stromal_cell_GSM260312
## 2 2 2
## Stromal_cell_GSM260313 Stromal_cell_GSM260314 Stromal_cell_GSM260321
## 2 2 2
## Stromal_cell_GSM260322 Stromal_cell_GSM260657 Stromal_cell_GSM260658
## 2 2 2
## Stromal_cell_GSM260659 Stromal_cell_GSM260661 Stromal_cell_GSM260662
## 2 2 2
## Stromal_cell_GSM260663 Stromal_cell_GSM260664 Stromal_cell_GSM260665
## 2 2 2
## Stromal_cell_GSM260666 Stromal_cell_GSM260667 Stromal_cell_GSM260668
## 2 2 2
## Stromal_cell_GSM260669 Stromal_cell_GSM260670 Stromal_cell_GSM260671
## 2 2 2
## Stromal_cell_GSM260672 Stromal_cell_GSM260673 Stromal_cell_GSM260674
## 2 2 2
## Stromal_cell_GSM260675 Stromal_cell_GSM260676 Stromal_cell_GSM260678
## 2 2 2
## Stromal_cell_GSM260679 Stromal_cell_GSM260680 Stromal_cell_GSM260681
## 2 2 2
## Stromal_cell_GSM260682 Stromal_cell_GSM260683 Stromal_cell_GSM260684
## 2 2 2
## Stromal_cell_GSM260685 Stromal_cell_GSM260686 Blood_cell_GSM260689
## 2 2 1
## Blood_cell_GSM260690 Blood_cell_GSM260691 Blood_cell_GSM260692
## 1 1 1
## Blood_cell_GSM260693 Blood_cell_GSM260694 Blood_cell_GSM260695
## 1 1 1
## Blood_cell_GSM260696 Blood_cell_GSM260697 Blood_cell_GSM260698
## 1 1 1
## Blood_cell_GSM260699 Blood_cell_GSM260700 Blood_cell_GSM260701
## 1 1 1
## Blood_cell_GSM264755 Blood_cell_GSM264756 Blood_cell_GSM264757
## 1 1 1
## Blood_cell_GSM264758 Stromal_cell_GSM265494 Stromal_cell_GSM265495
## 1 2 2
## Stromal_cell_GSM265496 Stromal_cell_GSM265497 Stromal_cell_GSM265498
## 2 2 2
## Stromal_cell_GSM265499 Blood_cell_GSM279572 Blood_cell_GSM279573
## 2 4 4
## Blood_cell_GSM279574 Blood_cell_GSM279575 Blood_cell_GSM279576
## 4 4 4
## Blood_cell_GSM279577 Blood_cell_GSM279578 Blood_cell_GSM279579
## 4 4 4
## Blood_cell_GSM279580 Blood_cell_GSM279581 Blood_cell_GSM279582
## 4 4 4
## Blood_cell_GSM279583 Blood_cell_GSM279584 Blood_cell_GSM286015
## 4 4 1
## Blood_cell_GSM286017 Blood_cell_GSM286086 Blood_cell_GSM286087
## 1 1 1
## Blood_cell_GSM286088 Blood_cell_GSM286089 Blood_cell_GSM286090
## 1 1 1
## Blood_cell_GSM286091 Stromal_cell_GSM287216 Stromal_cell_GSM287217
## 1 2 2
## Stromal_cell_GSM287218 Stromal_cell_GSM287219 Stromal_cell_GSM287220
## 2 2 2
## Stromal_cell_GSM287222 Blood_cell_GSM289612 Blood_cell_GSM289613
## 2 5 5
## Blood_cell_GSM289614 Blood_cell_GSM289615 Blood_cell_GSM289616
## 5 5 5
## Blood_cell_GSM289617 Blood_cell_GSM289618 Blood_cell_GSM290414
## 5 5 4
## Blood_cell_GSM290415 Blood_cell_GSM290420 Blood_cell_GSM290421
## 4 4 4
## Blood_cell_GSM290423 Other_GSM299095 Other_GSM299096
## 4 3 3
## Other_GSM299097 Other_GSM299098 Other_GSM299099
## 3 3 3
## Other_GSM299100 Blood_cell_GSM299556 Blood_cell_GSM299557
## 3 5 5
## Blood_cell_GSM299558 Blood_cell_GSM299559 Blood_cell_GSM299560
## 5 1 1
## Blood_cell_GSM299561 Blood_cell_GSM299562 Blood_cell_GSM299563
## 5 5 5
## Blood_cell_GSM299564 Blood_cell_GSM299565 Blood_cell_GSM300389
## 1 1 1
## Blood_cell_GSM300390 Blood_cell_GSM300392 Blood_cell_GSM300393
## 1 1 1
## Blood_cell_GSM300394 Blood_cell_GSM300395 Blood_cell_GSM300398
## 1 1 1
## Blood_cell_GSM300399 Blood_cell_GSM300401 Blood_cell_GSM300402
## 1 1 1
## Blood_cell_GSM300403 Blood_cell_GSM300404 ES_iPS_germ_GSM304260
## 1 1 8
## ES_iPS_germ_GSM304261 ES_iPS_germ_GSM304262 Blood_cell_GSM305430
## 8 8 5
## Blood_cell_GSM305432 Blood_cell_GSM305433 Blood_cell_GSM305434
## 5 1 5
## Blood_cell_GSM305435 Blood_cell_GSM305436 Blood_cell_GSM305437
## 1 5 1
## Blood_cell_GSM305438 Blood_cell_GSM305439 Blood_cell_GSM305440
## 5 1 5
## Blood_cell_GSM305441 Blood_cell_GSM305442 Endothel_GSM305784
## 1 1 7
## Endothel_GSM305785 Endothel_GSM305786 Endothel_GSM305787
## 7 7 7
## Blood_cell_GSM310429 Blood_cell_GSM310430 Blood_cell_GSM310431
## 4 4 4
## Blood_cell_GSM310432 Blood_cell_GSM310433 Blood_cell_GSM310434
## 4 4 4
## Blood_cell_GSM310435 Blood_cell_GSM310436 Blood_cell_GSM310437
## 4 4 4
## Blood_cell_GSM310438 Blood_cell_GSM310439 Blood_cell_GSM310440
## 4 4 4
## Blood_cell_GSM320543 Blood_cell_GSM320544 Blood_cell_GSM320545
## 1 1 1
## Blood_cell_GSM320546 Blood_cell_GSM320547 Blood_cell_GSM320548
## 1 1 1
## Blood_cell_GSM320549 Blood_cell_GSM320550 Blood_cell_GSM320551
## 1 1 1
## Blood_cell_GSM320552 Stromal_cell_GSM322374 Stromal_cell_GSM322375
## 1 2 2
## Stromal_cell_GSM322376 Stromal_cell_GSM322377 Endothel_GSM330313
## 2 2 7
## Endothel_GSM330314 Endothel_GSM330315 Endothel_GSM330316
## 7 7 7
## Endothel_GSM335393 Endothel_GSM335395 Endothel_GSM335396
## 7 7 7
## Endothel_GSM335851 Endothel_GSM335859 Endothel_GSM335904
## 7 7 7
## Endothel_GSM335906 Endothel_GSM336559 Blood_cell_GSM343802
## 7 7 1
## Blood_cell_GSM343803 Blood_cell_GSM343804 Blood_cell_GSM343805
## 1 1 1
## Blood_cell_GSM343806 Blood_cell_GSM343807 Blood_cell_GSM343808
## 1 1 1
## Blood_cell_GSM343809 Blood_cell_GSM343810 Blood_cell_GSM343811
## 1 1 1
## Blood_cell_GSM343812 Blood_cell_GSM343813 Blood_cell_GSM343814
## 1 1 1
## Blood_cell_GSM343815 Blood_cell_GSM343816 Blood_cell_GSM343817
## 1 1 1
## Blood_cell_GSM343818 Blood_cell_GSM343819 Blood_cell_GSM343820
## 1 1 1
## Blood_cell_GSM343821 Blood_cell_GSM343822 Blood_cell_GSM343823
## 1 1 1
## Blood_cell_GSM343824 Blood_cell_GSM343825 Blood_cell_GSM343826
## 1 1 1
## Blood_cell_GSM343827 Blood_cell_GSM343828 Blood_cell_GSM343829
## 1 1 1
## Blood_cell_GSM343830 Blood_cell_GSM343831 Stromal_cell_GSM346941
## 1 1 2
## Stromal_cell_GSM346942 Stromal_cell_GSM346943 Stromal_cell_GSM346944
## 2 2 2
## Endothel_GSM346951 Endothel_GSM346952 Stromal_cell_GSM346959
## 7 7 2
## Stromal_cell_GSM346960 ES_iPS_germ_GSM347916 ES_iPS_germ_GSM347917
## 2 9 9
## ES_iPS_germ_GSM347918 Stromal_cell_GSM347919 Stromal_cell_GSM347920
## 9 2 2
## ES_iPS_germ_GSM347922 ES_iPS_germ_GSM347923 ES_iPS_germ_GSM347924
## 9 9 9
## ES_iPS_germ_GSM347925 Blood_cell_GSM349848 Blood_cell_GSM349849
## 9 4 4
## Blood_cell_GSM350084 Blood_cell_GSM350085 Blood_cell_GSM350086
## 5 5 5
## Blood_cell_GSM359332 Blood_cell_GSM359753 Blood_cell_GSM359754
## 1 1 1
## Blood_cell_GSM359755 Blood_cell_GSM359758 Blood_cell_GSM359759
## 1 1 1
## Blood_cell_GSM359760 Blood_cell_GSM361266 Blood_cell_GSM361272
## 1 5 5
## Blood_cell_GSM361278 Blood_cell_GSM361283 Blood_cell_GSM361285
## 5 5 5
## Stromal_cell_GSM366942 ES_iPS_germ_GSM367061 ES_iPS_germ_GSM367062
## 2 9 9
## ES_iPS_germ_GSM367219 ES_iPS_germ_GSM367240 ES_iPS_germ_GSM367241
## 9 9 9
## ES_iPS_germ_GSM367242 ES_iPS_germ_GSM367243 ES_iPS_germ_GSM367244
## 9 9 9
## ES_iPS_germ_GSM367245 ES_iPS_germ_GSM367258 Stromal_cell_GSM372142
## 9 9 2
## Stromal_cell_GSM372144 Stromal_cell_GSM372146 ES_iPS_germ_GSM372154
## 2 2 9
## ES_iPS_germ_GSM372155 ES_iPS_germ_GSM372156 ES_iPS_germ_GSM372157
## 9 9 9
## ES_iPS_germ_GSM372158 ES_iPS_germ_GSM372159 Blood_cell_GSM372800
## 9 9 4
## Blood_cell_GSM372801 Blood_cell_GSM372802 Blood_cell_GSM372803
## 4 4 4
## Blood_cell_GSM372804 Blood_cell_GSM372805 Blood_cell_GSM372806
## 4 4 4
## Blood_cell_GSM372807 Blood_cell_GSM372808 Blood_cell_GSM372809
## 4 4 4
## Blood_cell_GSM372810 Blood_cell_GSM372811 Blood_cell_GSM372812
## 4 4 4
## Blood_cell_GSM372813 Blood_cell_GSM372814 Blood_cell_GSM372815
## 4 4 4
## Blood_cell_GSM372816 Blood_cell_GSM372817 Blood_cell_GSM372818
## 4 4 4
## ES_iPS_germ_GSM378811 Blood_cell_GSM381339 Blood_cell_GSM381340
## 9 4 4
## Blood_cell_GSM381341 Blood_cell_GSM381342 Blood_cell_GSM381343
## 4 4 4
## Blood_cell_GSM381344 Blood_cell_GSM381345 Blood_cell_GSM381346
## 4 4 4
## Endothel_GSM385333 Endothel_GSM385338 Endothel_GSM385350
## 7 7 7
## Endothel_GSM385353 Stromal_cell_GSM402707 ES_iPS_germ_GSM402717
## 7 2 9
## ES_iPS_germ_GSM402752 ES_iPS_germ_GSM402806 Endothel_GSM410666
## 9 9 7
## Endothel_GSM410667 Endothel_GSM410668 Endothel_GSM410669
## 7 7 7
## Endothel_GSM410672 Endothel_GSM410673 Endothel_GSM410674
## 7 7 7
## Endothel_GSM410675 Endothel_GSM410678 Endothel_GSM410679
## 7 7 7
## Endothel_GSM410680 Endothel_GSM410681 Endothel_GSM410684
## 7 7 7
## Endothel_GSM410685 Endothel_GSM410686 Endothel_GSM410687
## 7 7 7
## Stromal_cell_GSM413840 Stromal_cell_GSM413842 Stromal_cell_GSM413846
## 2 2 2
## Stromal_cell_GSM413847 Stromal_cell_GSM413848 Blood_cell_GSM419987
## 2 2 1
## Blood_cell_GSM419988 Blood_cell_GSM419989 Blood_cell_GSM419990
## 1 1 1
## Blood_cell_GSM419991 Blood_cell_GSM419992 Blood_cell_GSM422109
## 1 1 5
## Blood_cell_GSM422110 Blood_cell_GSM422111 Blood_cell_GSM422112
## 5 5 5
## Blood_cell_GSM422113 Blood_cell_GSM422114 Blood_cell_GSM422116
## 5 5 5
## Blood_cell_GSM432175 Blood_cell_GSM432176 Blood_cell_GSM432177
## 5 5 5
## Blood_cell_GSM432178 Blood_cell_GSM432179 Blood_cell_GSM432180
## 5 5 5
## Stromal_cell_GSM451153 Stromal_cell_GSM451154 Stromal_cell_GSM451155
## 2 2 2
## Stromal_cell_GSM451156 Stromal_cell_GSM451157 Stromal_cell_GSM451158
## 2 2 2
## Stromal_cell_GSM451160 Stromal_cell_GSM451161 Hepatocytes_GSM456349
## 2 2 10
## Hepatocytes_GSM456350 Hepatocytes_GSM456351 Blood_cell_GSM466515
## 10 10 5
## Blood_cell_GSM466516 Blood_cell_GSM466517 Blood_cell_GSM466518
## 5 5 5
## Blood_cell_GSM466519 Stromal_cell_GSM469125 Stromal_cell_GSM469126
## 5 2 2
## Stromal_cell_GSM469127 Stromal_cell_GSM469128 Stromal_cell_GSM469129
## 2 2 2
## Stromal_cell_GSM469130 Stromal_cell_GSM469131 Stromal_cell_GSM469132
## 2 2 2
## Stromal_cell_GSM469136 ES_iPS_germ_GSM469409 Neuro_endo_GSM469411
## 2 9 2
## Neuro_endo_GSM469412 Endothel_GSM476782 Endothel_GSM476783
## 2 7 7
## Endothel_GSM476784 Endothel_GSM476785 Endothel_GSM476786
## 7 7 7
## Blood_cell_GSM483480 Blood_cell_GSM483481 Blood_cell_GSM483482
## 5 5 5
## Blood_cell_GSM483483 Blood_cell_GSM483484 Blood_cell_GSM483485
## 5 5 5
## Blood_cell_GSM488968 Blood_cell_GSM488969 Blood_cell_GSM488970
## 5 5 5
## Blood_cell_GSM488971 Blood_cell_GSM488972 Blood_cell_GSM488973
## 5 4 4
## Blood_cell_GSM488974 Blood_cell_GSM488975 Blood_cell_GSM488976
## 5 5 5
## Blood_cell_GSM488977 Blood_cell_GSM488978 Blood_cell_GSM488979
## 5 5 5
## Blood_cell_GSM488980 Blood_cell_GSM488981 Blood_cell_GSM488982
## 5 5 5
## Blood_cell_GSM488983 Endothel_GSM492832 Endothel_GSM492833
## 5 7 7
## Stromal_cell_GSM492834 Stromal_cell_GSM492835 Stromal_cell_GSM500995
## 2 2 2
## ES_iPS_germ_GSM500996 ES_iPS_germ_GSM500997 ES_iPS_germ_GSM500998
## 9 9 9
## ES_iPS_germ_GSM500999 ES_iPS_germ_GSM501000 Stromal_cell_GSM501001
## 9 9 2
## Stromal_cell_GSM501002 Stromal_cell_GSM501003 ES_iPS_germ_GSM501004
## 2 2 9
## ES_iPS_germ_GSM501005 ES_iPS_germ_GSM501006 ES_iPS_germ_GSM501007
## 9 9 9
## ES_iPS_germ_GSM501008 ES_iPS_germ_GSM501009 Stromal_cell_GSM501890
## 9 9 2
## Stromal_cell_GSM501891 Stromal_cell_GSM501892 Stromal_cell_GSM501893
## 2 2 2
## Stromal_cell_GSM501894 Stromal_cell_GSM501895 Blood_cell_GSM514669
## 2 2 1
## Blood_cell_GSM514670 Blood_cell_GSM514671 Blood_cell_GSM514672
## 1 1 1
## ES_iPS_germ_GSM530601 ES_iPS_germ_GSM530602 ES_iPS_germ_GSM530603
## 9 9 9
## ES_iPS_germ_GSM530604 ES_iPS_germ_GSM530605 ES_iPS_germ_GSM530606
## 9 9 9
## ES_iPS_germ_GSM530607 ES_iPS_germ_GSM530611 Neuro_endo_GSM53382
## 9 9 8
## Neuro_endo_GSM53383 Neuro_endo_GSM53384 Neuro_endo_GSM53385
## 8 8 8
## Neuro_endo_GSM53386 Neuro_endo_GSM53387 ES_iPS_germ_GSM540714
## 8 8 9
## ES_iPS_germ_GSM540715 ES_iPS_germ_GSM540716 Blood_cell_GSM542578
## 9 9 4
## Blood_cell_GSM547998 Blood_cell_GSM547999 Blood_cell_GSM548000
## 4 4 4
## Blood_cell_GSM548001 Blood_cell_GSM549577 Blood_cell_GSM549578
## 4 5 5
## Blood_cell_GSM549579 Blood_cell_GSM549580 Blood_cell_GSM549581
## 5 5 5
## Blood_cell_GSM549582 Blood_cell_GSM549583 Blood_cell_GSM549584
## 5 5 5
## Endothel_GSM551183 Blood_cell_GSM556647 Blood_cell_GSM556663
## 7 5 1
## Blood_cell_GSM556665 Neuro_endo_GSM92231 Neuro_endo_GSM92232
## 1 2 2
## Neuro_endo_GSM92233 Neuro_endo_GSM92234 _A_Alexander cells_liver
## 2 2 10
## _A_C3A_liver _A_Hep 3B2.17_liver _A_Hep G2_liver
## 10 10 10
## _A_huH1_liver _A_HuH6_liver _A_HuH7_liver
## 10 10 10
## _A_JHH5_liver _A_JHH7_liver _A_PLC_PRF_5_liver
## 10 10 10
## _B_HLE_liver _B_HLF_liver _B_JHH2_liver
## 2 2 2
## _B_JHH4_liver _B_Li7_liver _B_SNU182_liver
## 2 2 2
## _B_SNU387_liver _B_SNU423_liver _B_SNU449_liver
## 2 2 2
## _B_SNU475_liver _B_SNU761_liver _B_SNU878_liver
## 2 2 2
## _B_SNU886_liver _C_JHH1_liver _C_JHH6_liver
## 2 1 2
## _C_NCIH684_liver _C_SKHEP1_liver _C_SNU398_liver
## 5 2 9
row_clst_df <- data.frame(1:length(row_clst$order),row_clst$order, row_clst$labels,row_clst$labels[row_clst$order],cutree(row_clst, k = 10)[row_clst$order])
row_clst_df
## X1.length.row_clst.order. row_clst.order
## ES_iPS_germ_GSM530604 1 679
## ES_iPS_germ_GSM530606 2 681
## ES_iPS_germ_GSM530601 3 676
## ES_iPS_germ_GSM530603 4 678
## ES_iPS_germ_GSM372156 5 512
## ES_iPS_germ_GSM372154 6 510
## ES_iPS_germ_GSM372155 7 511
## ES_iPS_germ_GSM469409 8 617
## ES_iPS_germ_GSM172866 9 129
## ES_iPS_germ_GSM172865 10 128
## ES_iPS_germ_GSM172870 11 133
## ES_iPS_germ_GSM172868 12 131
## ES_iPS_germ_GSM172867 13 130
## ES_iPS_germ_GSM172869 14 132
## ES_iPS_germ_GSM540716 15 692
## ES_iPS_germ_GSM540714 16 690
## ES_iPS_germ_GSM540715 17 691
## ES_iPS_germ_GSM402806 18 551
## ES_iPS_germ_GSM402717 19 549
## ES_iPS_germ_GSM402752 20 550
## ES_iPS_germ_GSM530611 21 683
## _C_SNU398_liver 22 741
## ES_iPS_germ_GSM501008 23 664
## ES_iPS_germ_GSM501007 24 663
## ES_iPS_germ_GSM501009 25 665
## ES_iPS_germ_GSM501004 26 660
## ES_iPS_germ_GSM501006 27 662
## ES_iPS_germ_GSM500996 28 652
## ES_iPS_germ_GSM500997 29 653
## ES_iPS_germ_GSM501000 30 656
## ES_iPS_germ_GSM500998 31 654
## ES_iPS_germ_GSM500999 32 655
## ES_iPS_germ_GSM347922 33 475
## ES_iPS_germ_GSM501005 34 661
## ES_iPS_germ_GSM378811 35 535
## ES_iPS_germ_GSM347917 36 471
## ES_iPS_germ_GSM347916 37 470
## ES_iPS_germ_GSM347918 38 472
## ES_iPS_germ_GSM347924 39 477
## ES_iPS_germ_GSM347923 40 476
## ES_iPS_germ_GSM347925 41 478
## ES_iPS_germ_GSM225042 42 231
## ES_iPS_germ_GSM230294 43 232
## ES_iPS_germ_GSM530602 44 677
## ES_iPS_germ_GSM530605 45 680
## ES_iPS_germ_GSM530607 46 682
## ES_iPS_germ_GSM372157 47 513
## ES_iPS_germ_GSM372159 48 515
## ES_iPS_germ_GSM367062 49 498
## ES_iPS_germ_GSM372158 50 514
## ES_iPS_germ_GSM367243 51 503
## ES_iPS_germ_GSM367244 52 504
## ES_iPS_germ_GSM367245 53 505
## ES_iPS_germ_GSM367258 54 506
## ES_iPS_germ_GSM367061 55 497
## ES_iPS_germ_GSM367241 56 501
## ES_iPS_germ_GSM367242 57 502
## ES_iPS_germ_GSM367219 58 499
## ES_iPS_germ_GSM367240 59 500
## Neuro_endo_GSM53385 60 687
## Neuro_endo_GSM53386 61 688
## Neuro_endo_GSM53382 62 684
## Neuro_endo_GSM53384 63 686
## Neuro_endo_GSM53383 64 685
## Neuro_endo_GSM53387 65 689
## ES_iPS_germ_GSM304262 66 377
## ES_iPS_germ_GSM304260 67 375
## ES_iPS_germ_GSM304261 68 376
## ES_iPS_germ_GSM158468 69 122
## ES_iPS_germ_GSM158470 70 123
## Other_GSM173542 71 144
## Other_GSM173541 72 143
## Other_GSM173543 73 145
## Other_GSM173538 74 140
## Other_GSM173539 75 141
## Other_GSM173546 76 148
## Other_GSM173544 77 146
## Other_GSM173540 78 142
## Other_GSM173545 79 147
## Other_GSM173552 80 154
## Other_GSM173550 81 152
## Other_GSM173551 82 153
## Other_GSM173535 83 137
## Other_GSM173556 84 158
## Other_GSM173553 85 155
## Other_GSM173536 86 138
## Other_GSM173537 87 139
## Other_GSM173554 88 156
## Other_GSM173555 89 157
## Other_GSM173534 90 136
## Other_GSM173547 91 149
## Other_GSM173548 92 150
## Other_GSM173549 93 151
## Other_GSM173532 94 134
## Other_GSM173533 95 135
## Other_GSM119354 96 19
## Other_GSM119362 97 24
## Other_GSM119360 98 22
## Other_GSM119357 99 20
## Other_GSM119359 100 21
## Other_GSM119361 101 23
## Other_GSM119371 102 27
## Other_GSM119366 103 25
## Other_GSM119369 104 26
## Other_GSM119372 105 28
## Other_GSM299096 106 348
## Other_GSM299095 107 347
## Other_GSM299097 108 349
## Other_GSM299098 109 350
## Other_GSM299099 110 351
## Other_GSM299100 111 352
## Endothel_GSM410679 112 561
## Endothel_GSM410680 113 562
## Endothel_GSM410681 114 563
## Endothel_GSM410678 115 560
## Endothel_GSM410666 116 552
## Endothel_GSM410669 117 555
## Endothel_GSM410667 118 553
## Endothel_GSM410668 119 554
## Endothel_GSM410675 120 559
## Endothel_GSM410684 121 564
## Endothel_GSM410673 122 557
## Endothel_GSM410672 123 556
## Endothel_GSM410674 124 558
## Endothel_GSM410685 125 565
## Endothel_GSM410686 126 566
## Endothel_GSM410687 127 567
## Endothel_GSM143898 128 111
## Endothel_GSM143900 129 112
## Endothel_GSM143910 130 114
## Endothel_GSM143914 131 115
## Endothel_GSM143717 132 102
## Endothel_GSM143907 133 113
## Endothel_GSM305787 134 393
## Endothel_GSM305784 135 390
## Endothel_GSM305785 136 391
## Endothel_GSM476784 137 622
## Endothel_GSM476783 138 621
## Endothel_GSM476786 139 624
## Endothel_GSM476782 140 620
## Endothel_GSM476785 141 623
## Endothel_GSM492832 142 647
## Endothel_GSM492833 143 648
## Endothel_GSM141252 144 99
## Endothel_GSM141253 145 100
## Endothel_GSM141251 146 98
## Endothel_GSM141255 147 101
## Endothel_GSM330314 148 421
## Endothel_GSM143726 149 103
## Endothel_GSM335859 150 428
## Endothel_GSM330313 151 420
## Endothel_GSM335393 152 424
## Endothel_GSM335851 153 427
## Endothel_GSM335395 154 425
## Endothel_GSM385350 155 546
## Endothel_GSM385353 156 547
## Endothel_GSM143727 157 104
## Endothel_GSM385333 158 544
## Endothel_GSM385338 159 545
## Endothel_GSM346952 160 467
## Endothel_GSM346951 161 466
## Endothel_GSM551183 162 706
## Endothel_GSM330315 163 422
## Endothel_GSM335904 164 429
## Endothel_GSM330316 165 423
## Endothel_GSM335396 166 426
## Endothel_GSM335906 167 430
## Endothel_GSM336559 168 431
## Endothel_GSM143729 169 106
## Endothel_GSM143728 170 105
## Endothel_GSM143731 171 108
## Endothel_GSM143732 172 109
## Endothel_GSM143733 173 110
## Endothel_GSM143730 174 107
## Endothel_GSM305786 175 392
## Stromal_cell_GSM413842 176 569
## Stromal_cell_GSM372142 177 507
## Stromal_cell_GSM372144 178 508
## Stromal_cell_GSM372146 179 509
## Stromal_cell_GSM366942 180 496
## Stromal_cell_GSM402707 181 548
## Stromal_cell_GSM500995 182 651
## Stromal_cell_GSM347919 183 473
## Stromal_cell_GSM347920 184 474
## Stromal_cell_GSM501001 185 657
## Stromal_cell_GSM501002 186 658
## Stromal_cell_GSM501003 187 659
## Stromal_cell_GSM501890 188 666
## Stromal_cell_GSM501895 189 671
## Stromal_cell_GSM501891 190 667
## Stromal_cell_GSM501894 191 670
## Stromal_cell_GSM501892 192 668
## Stromal_cell_GSM501893 193 669
## Stromal_cell_GSM260309 194 249
## Stromal_cell_GSM260311 195 251
## Stromal_cell_GSM260312 196 252
## Stromal_cell_GSM260310 197 250
## Stromal_cell_GSM260313 198 253
## Stromal_cell_GSM260305 199 245
## Stromal_cell_GSM260306 200 246
## Stromal_cell_GSM260308 201 248
## Stromal_cell_GSM260321 202 255
## Stromal_cell_GSM260307 203 247
## Stromal_cell_GSM260314 204 254
## Stromal_cell_GSM260322 205 256
## Stromal_cell_GSM287219 206 332
## Stromal_cell_GSM287218 207 331
## Stromal_cell_GSM287222 208 334
## Stromal_cell_GSM287217 209 330
## Stromal_cell_GSM287216 210 329
## Stromal_cell_GSM287220 211 333
## Stromal_cell_GSM239260 212 233
## Stromal_cell_GSM239379 213 234
## Stromal_cell_GSM239457 214 235
## Stromal_cell_GSM239606 215 236
## Stromal_cell_GSM239612 216 237
## Stromal_cell_GSM239613 217 238
## Stromal_cell_GSM239668 218 240
## Stromal_cell_GSM239616 219 239
## Stromal_cell_GSM239669 220 241
## Stromal_cell_GSM413847 221 571
## Stromal_cell_GSM413846 222 570
## Stromal_cell_GSM413848 223 572
## Stromal_cell_GSM260669 224 268
## Stromal_cell_GSM260672 225 271
## Stromal_cell_GSM260671 226 270
## Stromal_cell_GSM260670 227 269
## Stromal_cell_GSM260673 228 272
## Stromal_cell_GSM260682 229 280
## Stromal_cell_GSM260685 230 283
## Stromal_cell_GSM260674 231 273
## Stromal_cell_GSM260684 232 282
## Stromal_cell_GSM260666 233 265
## Stromal_cell_GSM260665 234 264
## Stromal_cell_GSM260663 235 262
## Stromal_cell_GSM260668 236 267
## Stromal_cell_GSM260664 237 263
## Stromal_cell_GSM260675 238 274
## Stromal_cell_GSM260681 239 279
## Stromal_cell_GSM260667 240 266
## Stromal_cell_GSM260678 241 276
## Stromal_cell_GSM260676 242 275
## Stromal_cell_GSM260679 243 277
## Stromal_cell_GSM260686 244 284
## Stromal_cell_GSM260680 245 278
## Stromal_cell_GSM260683 246 281
## Stromal_cell_GSM451153 247 592
## Stromal_cell_GSM451156 248 595
## Stromal_cell_GSM260661 249 260
## Stromal_cell_GSM260662 250 261
## Stromal_cell_GSM250019 251 242
## Stromal_cell_GSM260657 252 257
## Stromal_cell_GSM451154 253 593
## Stromal_cell_GSM451157 254 596
## Stromal_cell_GSM451158 255 597
## Stromal_cell_GSM250020 256 243
## Stromal_cell_GSM260658 257 258
## Stromal_cell_GSM250021 258 244
## Stromal_cell_GSM260659 259 259
## Stromal_cell_GSM451155 260 594
## Stromal_cell_GSM451160 261 598
## Stromal_cell_GSM451161 262 599
## _B_Li7_liver 263 728
## _B_SNU878_liver 264 735
## Stromal_cell_GSM346959 265 468
## Stromal_cell_GSM346960 266 469
## Stromal_cell_GSM116106 267 18
## Stromal_cell_GSM116103 268 15
## Stromal_cell_GSM116101 269 13
## Stromal_cell_GSM116102 270 14
## Stromal_cell_GSM116104 271 16
## Stromal_cell_GSM116105 272 17
## Stromal_cell_GSM346941 273 462
## Stromal_cell_GSM346942 274 463
## Stromal_cell_GSM492834 275 649
## Stromal_cell_GSM492835 276 650
## Stromal_cell_GSM322374 277 416
## Stromal_cell_GSM322375 278 417
## Stromal_cell_GSM322376 279 418
## Stromal_cell_GSM322377 280 419
## Stromal_cell_GSM413840 281 568
## Stromal_cell_GSM469126 282 609
## Stromal_cell_GSM469130 283 613
## Stromal_cell_GSM469127 284 610
## Stromal_cell_GSM469128 285 611
## Stromal_cell_GSM469129 286 612
## Stromal_cell_GSM346944 287 465
## Stromal_cell_GSM469125 288 608
## Stromal_cell_GSM346943 289 464
## Stromal_cell_GSM469132 290 615
## Stromal_cell_GSM469131 291 614
## Stromal_cell_GSM469136 292 616
## Stromal_cell_GSM265498 293 306
## Stromal_cell_GSM265494 294 302
## Stromal_cell_GSM265496 295 304
## Stromal_cell_GSM265495 296 303
## Stromal_cell_GSM265497 297 305
## Stromal_cell_GSM265499 298 307
## Neuro_endo_GSM92232 299 711
## Neuro_endo_GSM92234 300 713
## Neuro_endo_GSM92231 301 710
## Neuro_endo_GSM92233 302 712
## Neuro_endo_GSM469411 303 618
## Neuro_endo_GSM469412 304 619
## _B_SNU761_liver 305 734
## _C_SKHEP1_liver 306 740
## _B_SNU182_liver 307 729
## _B_SNU449_liver 308 732
## _B_HLE_liver 309 724
## _B_HLF_liver 310 725
## _B_SNU475_liver 311 733
## _B_SNU886_liver 312 736
## _B_JHH4_liver 313 727
## _B_SNU387_liver 314 730
## _B_SNU423_liver 315 731
## _B_JHH2_liver 316 726
## _C_JHH6_liver 317 738
## Hepatocytes_GSM456350 318 601
## Hepatocytes_GSM456349 319 600
## Hepatocytes_GSM456351 320 602
## _A_Alexander cells_liver 321 714
## _A_PLC_PRF_5_liver 322 723
## _A_HuH6_liver 323 719
## _A_huH1_liver 324 718
## _A_HuH7_liver 325 720
## _A_JHH5_liver 326 721
## _A_JHH7_liver 327 722
## _A_Hep 3B2.17_liver 328 716
## _A_C3A_liver 329 715
## _A_Hep G2_liver 330 717
## _C_JHH1_liver 331 737
## Blood_cell_GSM359754 332 486
## Blood_cell_GSM359760 333 490
## Blood_cell_GSM359758 334 488
## Blood_cell_GSM359753 335 485
## Blood_cell_GSM359759 336 489
## Blood_cell_GSM359332 337 484
## Blood_cell_GSM359755 338 487
## Blood_cell_GSM300401 339 371
## Blood_cell_GSM300399 340 370
## Blood_cell_GSM300403 341 373
## Blood_cell_GSM300404 342 374
## Blood_cell_GSM300392 343 365
## Blood_cell_GSM300394 344 367
## Blood_cell_GSM300398 345 369
## Blood_cell_GSM300393 346 366
## Blood_cell_GSM300402 347 372
## Blood_cell_GSM300390 348 364
## Blood_cell_GSM300389 349 363
## Blood_cell_GSM300395 350 368
## Blood_cell_GSM514672 351 675
## Blood_cell_GSM514670 352 673
## Blood_cell_GSM514669 353 672
## Blood_cell_GSM343806 354 436
## Blood_cell_GSM343822 355 452
## Blood_cell_GSM343824 356 454
## Blood_cell_GSM514671 357 674
## Blood_cell_GSM343817 358 447
## Blood_cell_GSM343819 359 449
## Blood_cell_GSM343815 360 445
## Blood_cell_GSM343805 361 435
## Blood_cell_GSM343831 362 461
## Blood_cell_GSM343807 363 437
## Blood_cell_GSM343813 364 443
## Blood_cell_GSM343825 365 455
## Blood_cell_GSM343811 366 441
## Blood_cell_GSM343829 367 459
## Blood_cell_GSM343808 368 438
## Blood_cell_GSM343810 369 440
## Blood_cell_GSM343812 370 442
## Blood_cell_GSM419989 371 575
## Blood_cell_GSM343828 372 458
## Blood_cell_GSM343830 373 460
## Blood_cell_GSM343816 374 446
## Blood_cell_GSM343818 375 448
## Blood_cell_GSM419988 376 574
## Blood_cell_GSM343802 377 432
## Blood_cell_GSM343804 378 434
## Blood_cell_GSM419992 379 578
## Blood_cell_GSM419987 380 573
## Blood_cell_GSM419990 381 576
## Blood_cell_GSM419991 382 577
## Blood_cell_GSM343821 383 451
## Blood_cell_GSM343809 384 439
## Blood_cell_GSM343814 385 444
## Blood_cell_GSM343826 386 456
## Blood_cell_GSM343803 387 433
## Blood_cell_GSM343827 388 457
## Blood_cell_GSM343820 389 450
## Blood_cell_GSM343823 390 453
## Blood_cell_GSM132924 391 79
## Blood_cell_GSM132926 392 81
## Blood_cell_GSM132928 393 83
## Blood_cell_GSM132927 394 82
## Blood_cell_GSM132919 395 75
## Blood_cell_GSM132923 396 78
## Blood_cell_GSM132925 397 80
## Blood_cell_GSM132921 398 76
## Blood_cell_GSM132922 399 77
## Blood_cell_GSM132929 400 84
## Blood_cell_GSM132930 401 85
## Blood_cell_GSM181930 402 170
## Blood_cell_GSM181971 403 175
## Blood_cell_GSM181973 404 177
## Blood_cell_GSM181982 405 183
## Blood_cell_GSM181997 406 186
## Blood_cell_GSM181931 407 171
## Blood_cell_GSM181933 408 173
## Blood_cell_GSM181857 409 169
## Blood_cell_GSM181978 410 180
## Blood_cell_GSM140953 411 92
## Blood_cell_GSM160534 412 126
## Blood_cell_GSM140968 413 93
## Blood_cell_GSM140969 414 94
## Blood_cell_GSM286088 415 325
## Blood_cell_GSM320546 416 409
## Blood_cell_GSM320544 417 407
## Blood_cell_GSM320548 418 411
## Blood_cell_GSM320550 419 413
## Blood_cell_GSM320552 420 415
## Blood_cell_GSM320545 421 408
## Blood_cell_GSM320551 422 414
## Blood_cell_GSM320547 423 410
## Blood_cell_GSM320549 424 412
## Blood_cell_GSM140973 425 97
## Blood_cell_GSM320543 426 406
## Blood_cell_GSM183305 427 200
## Blood_cell_GSM183393 428 205
## Blood_cell_GSM183482 429 213
## Blood_cell_GSM183467 430 212
## Blood_cell_GSM183392 431 204
## Blood_cell_GSM183466 432 211
## Blood_cell_GSM183316 433 203
## Blood_cell_GSM183463 434 208
## Blood_cell_GSM183394 435 206
## Blood_cell_GSM183462 436 207
## Blood_cell_GSM183306 437 201
## Blood_cell_GSM183217 438 199
## Blood_cell_GSM183315 439 202
## Blood_cell_GSM183464 440 209
## Blood_cell_GSM183465 441 210
## Blood_cell_GSM183487 442 218
## Blood_cell_GSM183209 443 198
## Blood_cell_GSM183165 444 194
## Blood_cell_GSM183486 445 217
## Blood_cell_GSM183196 446 196
## Blood_cell_GSM183483 447 214
## Blood_cell_GSM183485 448 216
## Blood_cell_GSM183193 449 195
## Blood_cell_GSM183201 450 197
## Blood_cell_GSM183484 451 215
## Blood_cell_GSM112670 452 12
## Blood_cell_GSM112490 453 1
## Blood_cell_GSM112668 454 10
## Blood_cell_GSM112540 455 3
## Blood_cell_GSM112491 456 2
## Blood_cell_GSM112669 457 11
## Blood_cell_GSM160530 458 124
## Blood_cell_GSM112664 459 6
## Blood_cell_GSM112666 460 8
## Blood_cell_GSM112661 461 5
## Blood_cell_GSM112665 462 7
## Blood_cell_GSM305433 463 380
## Blood_cell_GSM305435 464 382
## Blood_cell_GSM305441 465 388
## Blood_cell_GSM305442 466 389
## Blood_cell_GSM305437 467 384
## Blood_cell_GSM305439 468 386
## Blood_cell_GSM182000 469 189
## Blood_cell_GSM182002 470 191
## Blood_cell_GSM556663 471 708
## Blood_cell_GSM556665 472 709
## Blood_cell_GSM286091 473 328
## Blood_cell_GSM286089 474 326
## Blood_cell_GSM286090 475 327
## Blood_cell_GSM286017 476 322
## Blood_cell_GSM286086 477 323
## Blood_cell_GSM286087 478 324
## Blood_cell_GSM112541 479 4
## Blood_cell_GSM260694 480 290
## Blood_cell_GSM260695 481 291
## Blood_cell_GSM260691 482 287
## Blood_cell_GSM260692 483 288
## Blood_cell_GSM260689 484 285
## Blood_cell_GSM260697 485 293
## Blood_cell_GSM260699 486 295
## Blood_cell_GSM260693 487 289
## Blood_cell_GSM260690 488 286
## Blood_cell_GSM260696 489 292
## Blood_cell_GSM260701 490 297
## Blood_cell_GSM260698 491 294
## Blood_cell_GSM260700 492 296
## Blood_cell_GSM181974 493 178
## Blood_cell_GSM181976 494 179
## Blood_cell_GSM181981 495 182
## Blood_cell_GSM181984 496 185
## Blood_cell_GSM181999 497 188
## Blood_cell_GSM299559 498 356
## Blood_cell_GSM299560 499 357
## Blood_cell_GSM299565 500 362
## Blood_cell_GSM160532 501 125
## Blood_cell_GSM299564 502 361
## Blood_cell_GSM140970 503 95
## Blood_cell_GSM286015 504 321
## Blood_cell_GSM112667 505 9
## Blood_cell_GSM140971 506 96
## Blood_cell_GSM181972 507 176
## Blood_cell_GSM264757 508 300
## Blood_cell_GSM264758 509 301
## Blood_cell_GSM264755 510 298
## Blood_cell_GSM264756 511 299
## Blood_cell_GSM160536 512 127
## Blood_cell_GSM181983 513 184
## Blood_cell_GSM181998 514 187
## Blood_cell_GSM181980 515 181
## Blood_cell_GSM182001 516 190
## Blood_cell_GSM549579 517 700
## Blood_cell_GSM549577 518 698
## Blood_cell_GSM549578 519 699
## Blood_cell_GSM549581 520 702
## Blood_cell_GSM549580 521 701
## Blood_cell_GSM549583 522 704
## Blood_cell_GSM549582 523 703
## Blood_cell_GSM549584 524 705
## Blood_cell_GSM361278 525 493
## Blood_cell_GSM361266 526 491
## Blood_cell_GSM361272 527 492
## Blood_cell_GSM361283 528 494
## Blood_cell_GSM361285 529 495
## Blood_cell_GSM466518 530 606
## Blood_cell_GSM466519 531 607
## Blood_cell_GSM466515 532 603
## Blood_cell_GSM466516 533 604
## Blood_cell_GSM466517 534 605
## _C_NCIH684_liver 535 739
## Blood_cell_GSM289612 536 335
## Blood_cell_GSM289618 537 341
## Blood_cell_GSM289615 538 338
## Blood_cell_GSM289617 539 340
## Blood_cell_GSM289616 540 339
## Blood_cell_GSM289613 541 336
## Blood_cell_GSM289614 542 337
## Blood_cell_GSM483483 543 628
## Blood_cell_GSM483484 544 629
## Blood_cell_GSM483485 545 630
## Blood_cell_GSM483480 546 625
## Blood_cell_GSM483481 547 626
## Blood_cell_GSM483482 548 627
## Blood_cell_GSM488980 549 643
## Blood_cell_GSM488981 550 644
## Blood_cell_GSM488970 551 633
## Blood_cell_GSM488971 552 634
## Blood_cell_GSM488968 553 631
## Blood_cell_GSM488969 554 632
## Blood_cell_GSM488982 555 645
## Blood_cell_GSM488983 556 646
## Blood_cell_GSM488974 557 637
## Blood_cell_GSM488975 558 638
## Blood_cell_GSM189447 559 219
## Blood_cell_GSM189448 560 220
## Blood_cell_GSM189452 561 224
## Blood_cell_GSM189454 562 226
## Blood_cell_GSM189451 563 223
## Blood_cell_GSM189453 564 225
## Blood_cell_GSM189449 565 221
## Blood_cell_GSM189450 566 222
## Blood_cell_GSM305432 567 379
## Blood_cell_GSM305436 568 383
## Blood_cell_GSM305430 569 378
## Blood_cell_GSM305434 570 381
## Blood_cell_GSM182003 571 192
## Blood_cell_GSM182004 572 193
## Blood_cell_GSM181932 573 172
## Blood_cell_GSM181934 574 174
## Blood_cell_GSM299557 575 354
## Blood_cell_GSM299558 576 355
## Blood_cell_GSM305438 577 385
## Blood_cell_GSM299563 578 360
## Blood_cell_GSM299562 579 359
## Blood_cell_GSM305440 580 387
## Blood_cell_GSM422113 581 583
## Blood_cell_GSM422114 582 584
## Blood_cell_GSM422116 583 585
## Blood_cell_GSM422111 584 581
## Blood_cell_GSM422112 585 582
## Blood_cell_GSM422110 586 580
## Blood_cell_GSM140244 587 86
## Blood_cell_GSM422109 588 579
## Blood_cell_GSM1209586 589 61
## Blood_cell_GSM1209588 590 63
## Blood_cell_GSM1209589 591 64
## Blood_cell_GSM1209585 592 60
## Blood_cell_GSM1209587 593 62
## Blood_cell_GSM1209560 594 35
## Blood_cell_GSM1209558 595 33
## Blood_cell_GSM1209559 596 34
## Blood_cell_GSM140245 597 87
## Blood_cell_GSM140248 598 90
## Blood_cell_GSM140249 599 91
## Blood_cell_GSM178554 600 164
## Blood_cell_GSM178555 601 165
## Blood_cell_GSM140246 602 88
## Blood_cell_GSM140247 603 89
## Blood_cell_GSM178550 604 160
## Blood_cell_GSM178551 605 161
## Blood_cell_GSM178557 606 167
## Blood_cell_GSM488978 607 641
## Blood_cell_GSM178549 608 159
## Blood_cell_GSM178552 609 162
## Blood_cell_GSM178553 610 163
## Blood_cell_GSM488979 611 642
## Blood_cell_GSM178558 612 168
## Blood_cell_GSM299561 613 358
## Blood_cell_GSM178556 614 166
## Blood_cell_GSM299556 615 353
## Blood_cell_GSM432176 616 587
## Blood_cell_GSM350084 617 481
## Blood_cell_GSM350085 618 482
## Blood_cell_GSM350086 619 483
## Blood_cell_GSM432180 620 591
## Blood_cell_GSM432178 621 589
## Blood_cell_GSM432179 622 590
## Blood_cell_GSM432175 623 586
## Blood_cell_GSM432177 624 588
## Blood_cell_GSM556647 625 707
## Blood_cell_GSM488976 626 639
## Blood_cell_GSM488977 627 640
## Blood_cell_GSM1209591 628 66
## Blood_cell_GSM1209595 629 70
## Blood_cell_GSM1209594 630 69
## Blood_cell_GSM1209592 631 67
## Blood_cell_GSM1209593 632 68
## Blood_cell_GSM1209598 633 73
## Blood_cell_GSM1209597 634 72
## Blood_cell_GSM1209596 635 71
## Blood_cell_GSM1209599 636 74
## Blood_cell_GSM279574 637 310
## Blood_cell_GSM279580 638 316
## Blood_cell_GSM279577 639 313
## Blood_cell_GSM279578 640 314
## Blood_cell_GSM279581 641 317
## Blood_cell_GSM279582 642 318
## Blood_cell_GSM279575 643 311
## Blood_cell_GSM279576 644 312
## Blood_cell_GSM279572 645 308
## Blood_cell_GSM279573 646 309
## Blood_cell_GSM279583 647 319
## Blood_cell_GSM279579 648 315
## Blood_cell_GSM279584 649 320
## Blood_cell_GSM372813 650 529
## Blood_cell_GSM372804 651 520
## Blood_cell_GSM372803 652 519
## Blood_cell_GSM372810 653 526
## Blood_cell_GSM372816 654 532
## Blood_cell_GSM372818 655 534
## Blood_cell_GSM372800 656 516
## Blood_cell_GSM372809 657 525
## Blood_cell_GSM372811 658 527
## Blood_cell_GSM372808 659 524
## Blood_cell_GSM372817 660 533
## Blood_cell_GSM372806 661 522
## Blood_cell_GSM372807 662 523
## Blood_cell_GSM372801 663 517
## Blood_cell_GSM372802 664 518
## Blood_cell_GSM372812 665 528
## Blood_cell_GSM372805 666 521
## Blood_cell_GSM372814 667 530
## Blood_cell_GSM372815 668 531
## Blood_cell_GSM1209577 669 52
## Blood_cell_GSM1209580 670 55
## Blood_cell_GSM1209578 671 53
## Blood_cell_GSM1209579 672 54
## Blood_cell_GSM1209582 673 57
## Blood_cell_GSM1209561 674 36
## Blood_cell_GSM1209576 675 51
## Blood_cell_GSM1209563 676 38
## Blood_cell_GSM1209573 677 48
## Blood_cell_GSM1209562 678 37
## Blood_cell_GSM1209583 679 58
## Blood_cell_GSM1209575 680 50
## Blood_cell_GSM1209581 681 56
## Blood_cell_GSM1209574 682 49
## Blood_cell_GSM1209584 683 59
## Blood_cell_GSM153893 684 116
## Blood_cell_GSM154073 685 117
## Blood_cell_GSM154084 686 121
## Blood_cell_GSM154077 687 118
## Blood_cell_GSM154078 688 119
## Blood_cell_GSM154081 689 120
## Blood_cell_GSM547998 690 694
## Blood_cell_GSM548000 691 696
## Blood_cell_GSM547999 692 695
## Blood_cell_GSM548001 693 697
## Blood_cell_GSM542578 694 693
## Blood_cell_GSM349848 695 479
## Blood_cell_GSM349849 696 480
## Blood_cell_GSM310429 697 394
## Blood_cell_GSM198944 698 229
## Blood_cell_GSM198945 699 230
## Blood_cell_GSM198942 700 227
## Blood_cell_GSM198943 701 228
## Blood_cell_GSM381341 702 538
## Blood_cell_GSM381343 703 540
## Blood_cell_GSM381339 704 536
## Blood_cell_GSM381345 705 542
## Blood_cell_GSM381340 706 537
## Blood_cell_GSM381346 707 543
## Blood_cell_GSM381342 708 539
## Blood_cell_GSM381344 709 541
## Blood_cell_GSM310440 710 405
## Blood_cell_GSM488972 711 635
## Blood_cell_GSM488973 712 636
## Blood_cell_GSM310431 713 396
## Blood_cell_GSM310437 714 402
## Blood_cell_GSM310439 715 404
## Blood_cell_GSM310432 716 397
## Blood_cell_GSM310436 717 401
## Blood_cell_GSM310433 718 398
## Blood_cell_GSM310434 719 399
## Blood_cell_GSM310435 720 400
## Blood_cell_GSM310430 721 395
## Blood_cell_GSM310438 722 403
## Blood_cell_GSM290420 723 344
## Blood_cell_GSM290414 724 342
## Blood_cell_GSM290415 725 343
## Blood_cell_GSM290421 726 345
## Blood_cell_GSM290423 727 346
## Blood_cell_GSM1209554 728 29
## Blood_cell_GSM1209569 729 44
## Blood_cell_GSM1209556 730 31
## Blood_cell_GSM1209572 731 47
## Blood_cell_GSM1209555 732 30
## Blood_cell_GSM1209557 733 32
## Blood_cell_GSM1209564 734 39
## Blood_cell_GSM1209568 735 43
## Blood_cell_GSM1209566 736 41
## Blood_cell_GSM1209570 737 45
## Blood_cell_GSM1209567 738 42
## Blood_cell_GSM1209590 739 65
## Blood_cell_GSM1209565 740 40
## Blood_cell_GSM1209571 741 46
## row_clst.labels
## ES_iPS_germ_GSM530604 Blood_cell_GSM112490
## ES_iPS_germ_GSM530606 Blood_cell_GSM112491
## ES_iPS_germ_GSM530601 Blood_cell_GSM112540
## ES_iPS_germ_GSM530603 Blood_cell_GSM112541
## ES_iPS_germ_GSM372156 Blood_cell_GSM112661
## ES_iPS_germ_GSM372154 Blood_cell_GSM112664
## ES_iPS_germ_GSM372155 Blood_cell_GSM112665
## ES_iPS_germ_GSM469409 Blood_cell_GSM112666
## ES_iPS_germ_GSM172866 Blood_cell_GSM112667
## ES_iPS_germ_GSM172865 Blood_cell_GSM112668
## ES_iPS_germ_GSM172870 Blood_cell_GSM112669
## ES_iPS_germ_GSM172868 Blood_cell_GSM112670
## ES_iPS_germ_GSM172867 Stromal_cell_GSM116101
## ES_iPS_germ_GSM172869 Stromal_cell_GSM116102
## ES_iPS_germ_GSM540716 Stromal_cell_GSM116103
## ES_iPS_germ_GSM540714 Stromal_cell_GSM116104
## ES_iPS_germ_GSM540715 Stromal_cell_GSM116105
## ES_iPS_germ_GSM402806 Stromal_cell_GSM116106
## ES_iPS_germ_GSM402717 Other_GSM119354
## ES_iPS_germ_GSM402752 Other_GSM119357
## ES_iPS_germ_GSM530611 Other_GSM119359
## _C_SNU398_liver Other_GSM119360
## ES_iPS_germ_GSM501008 Other_GSM119361
## ES_iPS_germ_GSM501007 Other_GSM119362
## ES_iPS_germ_GSM501009 Other_GSM119366
## ES_iPS_germ_GSM501004 Other_GSM119369
## ES_iPS_germ_GSM501006 Other_GSM119371
## ES_iPS_germ_GSM500996 Other_GSM119372
## ES_iPS_germ_GSM500997 Blood_cell_GSM1209554
## ES_iPS_germ_GSM501000 Blood_cell_GSM1209555
## ES_iPS_germ_GSM500998 Blood_cell_GSM1209556
## ES_iPS_germ_GSM500999 Blood_cell_GSM1209557
## ES_iPS_germ_GSM347922 Blood_cell_GSM1209558
## ES_iPS_germ_GSM501005 Blood_cell_GSM1209559
## ES_iPS_germ_GSM378811 Blood_cell_GSM1209560
## ES_iPS_germ_GSM347917 Blood_cell_GSM1209561
## ES_iPS_germ_GSM347916 Blood_cell_GSM1209562
## ES_iPS_germ_GSM347918 Blood_cell_GSM1209563
## ES_iPS_germ_GSM347924 Blood_cell_GSM1209564
## ES_iPS_germ_GSM347923 Blood_cell_GSM1209565
## ES_iPS_germ_GSM347925 Blood_cell_GSM1209566
## ES_iPS_germ_GSM225042 Blood_cell_GSM1209567
## ES_iPS_germ_GSM230294 Blood_cell_GSM1209568
## ES_iPS_germ_GSM530602 Blood_cell_GSM1209569
## ES_iPS_germ_GSM530605 Blood_cell_GSM1209570
## ES_iPS_germ_GSM530607 Blood_cell_GSM1209571
## ES_iPS_germ_GSM372157 Blood_cell_GSM1209572
## ES_iPS_germ_GSM372159 Blood_cell_GSM1209573
## ES_iPS_germ_GSM367062 Blood_cell_GSM1209574
## ES_iPS_germ_GSM372158 Blood_cell_GSM1209575
## ES_iPS_germ_GSM367243 Blood_cell_GSM1209576
## ES_iPS_germ_GSM367244 Blood_cell_GSM1209577
## ES_iPS_germ_GSM367245 Blood_cell_GSM1209578
## ES_iPS_germ_GSM367258 Blood_cell_GSM1209579
## ES_iPS_germ_GSM367061 Blood_cell_GSM1209580
## ES_iPS_germ_GSM367241 Blood_cell_GSM1209581
## ES_iPS_germ_GSM367242 Blood_cell_GSM1209582
## ES_iPS_germ_GSM367219 Blood_cell_GSM1209583
## ES_iPS_germ_GSM367240 Blood_cell_GSM1209584
## Neuro_endo_GSM53385 Blood_cell_GSM1209585
## Neuro_endo_GSM53386 Blood_cell_GSM1209586
## Neuro_endo_GSM53382 Blood_cell_GSM1209587
## Neuro_endo_GSM53384 Blood_cell_GSM1209588
## Neuro_endo_GSM53383 Blood_cell_GSM1209589
## Neuro_endo_GSM53387 Blood_cell_GSM1209590
## ES_iPS_germ_GSM304262 Blood_cell_GSM1209591
## ES_iPS_germ_GSM304260 Blood_cell_GSM1209592
## ES_iPS_germ_GSM304261 Blood_cell_GSM1209593
## ES_iPS_germ_GSM158468 Blood_cell_GSM1209594
## ES_iPS_germ_GSM158470 Blood_cell_GSM1209595
## Other_GSM173542 Blood_cell_GSM1209596
## Other_GSM173541 Blood_cell_GSM1209597
## Other_GSM173543 Blood_cell_GSM1209598
## Other_GSM173538 Blood_cell_GSM1209599
## Other_GSM173539 Blood_cell_GSM132919
## Other_GSM173546 Blood_cell_GSM132921
## Other_GSM173544 Blood_cell_GSM132922
## Other_GSM173540 Blood_cell_GSM132923
## Other_GSM173545 Blood_cell_GSM132924
## Other_GSM173552 Blood_cell_GSM132925
## Other_GSM173550 Blood_cell_GSM132926
## Other_GSM173551 Blood_cell_GSM132927
## Other_GSM173535 Blood_cell_GSM132928
## Other_GSM173556 Blood_cell_GSM132929
## Other_GSM173553 Blood_cell_GSM132930
## Other_GSM173536 Blood_cell_GSM140244
## Other_GSM173537 Blood_cell_GSM140245
## Other_GSM173554 Blood_cell_GSM140246
## Other_GSM173555 Blood_cell_GSM140247
## Other_GSM173534 Blood_cell_GSM140248
## Other_GSM173547 Blood_cell_GSM140249
## Other_GSM173548 Blood_cell_GSM140953
## Other_GSM173549 Blood_cell_GSM140968
## Other_GSM173532 Blood_cell_GSM140969
## Other_GSM173533 Blood_cell_GSM140970
## Other_GSM119354 Blood_cell_GSM140971
## Other_GSM119362 Blood_cell_GSM140973
## Other_GSM119360 Endothel_GSM141251
## Other_GSM119357 Endothel_GSM141252
## Other_GSM119359 Endothel_GSM141253
## Other_GSM119361 Endothel_GSM141255
## Other_GSM119371 Endothel_GSM143717
## Other_GSM119366 Endothel_GSM143726
## Other_GSM119369 Endothel_GSM143727
## Other_GSM119372 Endothel_GSM143728
## Other_GSM299096 Endothel_GSM143729
## Other_GSM299095 Endothel_GSM143730
## Other_GSM299097 Endothel_GSM143731
## Other_GSM299098 Endothel_GSM143732
## Other_GSM299099 Endothel_GSM143733
## Other_GSM299100 Endothel_GSM143898
## Endothel_GSM410679 Endothel_GSM143900
## Endothel_GSM410680 Endothel_GSM143907
## Endothel_GSM410681 Endothel_GSM143910
## Endothel_GSM410678 Endothel_GSM143914
## Endothel_GSM410666 Blood_cell_GSM153893
## Endothel_GSM410669 Blood_cell_GSM154073
## Endothel_GSM410667 Blood_cell_GSM154077
## Endothel_GSM410668 Blood_cell_GSM154078
## Endothel_GSM410675 Blood_cell_GSM154081
## Endothel_GSM410684 Blood_cell_GSM154084
## Endothel_GSM410673 ES_iPS_germ_GSM158468
## Endothel_GSM410672 ES_iPS_germ_GSM158470
## Endothel_GSM410674 Blood_cell_GSM160530
## Endothel_GSM410685 Blood_cell_GSM160532
## Endothel_GSM410686 Blood_cell_GSM160534
## Endothel_GSM410687 Blood_cell_GSM160536
## Endothel_GSM143898 ES_iPS_germ_GSM172865
## Endothel_GSM143900 ES_iPS_germ_GSM172866
## Endothel_GSM143910 ES_iPS_germ_GSM172867
## Endothel_GSM143914 ES_iPS_germ_GSM172868
## Endothel_GSM143717 ES_iPS_germ_GSM172869
## Endothel_GSM143907 ES_iPS_germ_GSM172870
## Endothel_GSM305787 Other_GSM173532
## Endothel_GSM305784 Other_GSM173533
## Endothel_GSM305785 Other_GSM173534
## Endothel_GSM476784 Other_GSM173535
## Endothel_GSM476783 Other_GSM173536
## Endothel_GSM476786 Other_GSM173537
## Endothel_GSM476782 Other_GSM173538
## Endothel_GSM476785 Other_GSM173539
## Endothel_GSM492832 Other_GSM173540
## Endothel_GSM492833 Other_GSM173541
## Endothel_GSM141252 Other_GSM173542
## Endothel_GSM141253 Other_GSM173543
## Endothel_GSM141251 Other_GSM173544
## Endothel_GSM141255 Other_GSM173545
## Endothel_GSM330314 Other_GSM173546
## Endothel_GSM143726 Other_GSM173547
## Endothel_GSM335859 Other_GSM173548
## Endothel_GSM330313 Other_GSM173549
## Endothel_GSM335393 Other_GSM173550
## Endothel_GSM335851 Other_GSM173551
## Endothel_GSM335395 Other_GSM173552
## Endothel_GSM385350 Other_GSM173553
## Endothel_GSM385353 Other_GSM173554
## Endothel_GSM143727 Other_GSM173555
## Endothel_GSM385333 Other_GSM173556
## Endothel_GSM385338 Blood_cell_GSM178549
## Endothel_GSM346952 Blood_cell_GSM178550
## Endothel_GSM346951 Blood_cell_GSM178551
## Endothel_GSM551183 Blood_cell_GSM178552
## Endothel_GSM330315 Blood_cell_GSM178553
## Endothel_GSM335904 Blood_cell_GSM178554
## Endothel_GSM330316 Blood_cell_GSM178555
## Endothel_GSM335396 Blood_cell_GSM178556
## Endothel_GSM335906 Blood_cell_GSM178557
## Endothel_GSM336559 Blood_cell_GSM178558
## Endothel_GSM143729 Blood_cell_GSM181857
## Endothel_GSM143728 Blood_cell_GSM181930
## Endothel_GSM143731 Blood_cell_GSM181931
## Endothel_GSM143732 Blood_cell_GSM181932
## Endothel_GSM143733 Blood_cell_GSM181933
## Endothel_GSM143730 Blood_cell_GSM181934
## Endothel_GSM305786 Blood_cell_GSM181971
## Stromal_cell_GSM413842 Blood_cell_GSM181972
## Stromal_cell_GSM372142 Blood_cell_GSM181973
## Stromal_cell_GSM372144 Blood_cell_GSM181974
## Stromal_cell_GSM372146 Blood_cell_GSM181976
## Stromal_cell_GSM366942 Blood_cell_GSM181978
## Stromal_cell_GSM402707 Blood_cell_GSM181980
## Stromal_cell_GSM500995 Blood_cell_GSM181981
## Stromal_cell_GSM347919 Blood_cell_GSM181982
## Stromal_cell_GSM347920 Blood_cell_GSM181983
## Stromal_cell_GSM501001 Blood_cell_GSM181984
## Stromal_cell_GSM501002 Blood_cell_GSM181997
## Stromal_cell_GSM501003 Blood_cell_GSM181998
## Stromal_cell_GSM501890 Blood_cell_GSM181999
## Stromal_cell_GSM501895 Blood_cell_GSM182000
## Stromal_cell_GSM501891 Blood_cell_GSM182001
## Stromal_cell_GSM501894 Blood_cell_GSM182002
## Stromal_cell_GSM501892 Blood_cell_GSM182003
## Stromal_cell_GSM501893 Blood_cell_GSM182004
## Stromal_cell_GSM260309 Blood_cell_GSM183165
## Stromal_cell_GSM260311 Blood_cell_GSM183193
## Stromal_cell_GSM260312 Blood_cell_GSM183196
## Stromal_cell_GSM260310 Blood_cell_GSM183201
## Stromal_cell_GSM260313 Blood_cell_GSM183209
## Stromal_cell_GSM260305 Blood_cell_GSM183217
## Stromal_cell_GSM260306 Blood_cell_GSM183305
## Stromal_cell_GSM260308 Blood_cell_GSM183306
## Stromal_cell_GSM260321 Blood_cell_GSM183315
## Stromal_cell_GSM260307 Blood_cell_GSM183316
## Stromal_cell_GSM260314 Blood_cell_GSM183392
## Stromal_cell_GSM260322 Blood_cell_GSM183393
## Stromal_cell_GSM287219 Blood_cell_GSM183394
## Stromal_cell_GSM287218 Blood_cell_GSM183462
## Stromal_cell_GSM287222 Blood_cell_GSM183463
## Stromal_cell_GSM287217 Blood_cell_GSM183464
## Stromal_cell_GSM287216 Blood_cell_GSM183465
## Stromal_cell_GSM287220 Blood_cell_GSM183466
## Stromal_cell_GSM239260 Blood_cell_GSM183467
## Stromal_cell_GSM239379 Blood_cell_GSM183482
## Stromal_cell_GSM239457 Blood_cell_GSM183483
## Stromal_cell_GSM239606 Blood_cell_GSM183484
## Stromal_cell_GSM239612 Blood_cell_GSM183485
## Stromal_cell_GSM239613 Blood_cell_GSM183486
## Stromal_cell_GSM239668 Blood_cell_GSM183487
## Stromal_cell_GSM239616 Blood_cell_GSM189447
## Stromal_cell_GSM239669 Blood_cell_GSM189448
## Stromal_cell_GSM413847 Blood_cell_GSM189449
## Stromal_cell_GSM413846 Blood_cell_GSM189450
## Stromal_cell_GSM413848 Blood_cell_GSM189451
## Stromal_cell_GSM260669 Blood_cell_GSM189452
## Stromal_cell_GSM260672 Blood_cell_GSM189453
## Stromal_cell_GSM260671 Blood_cell_GSM189454
## Stromal_cell_GSM260670 Blood_cell_GSM198942
## Stromal_cell_GSM260673 Blood_cell_GSM198943
## Stromal_cell_GSM260682 Blood_cell_GSM198944
## Stromal_cell_GSM260685 Blood_cell_GSM198945
## Stromal_cell_GSM260674 ES_iPS_germ_GSM225042
## Stromal_cell_GSM260684 ES_iPS_germ_GSM230294
## Stromal_cell_GSM260666 Stromal_cell_GSM239260
## Stromal_cell_GSM260665 Stromal_cell_GSM239379
## Stromal_cell_GSM260663 Stromal_cell_GSM239457
## Stromal_cell_GSM260668 Stromal_cell_GSM239606
## Stromal_cell_GSM260664 Stromal_cell_GSM239612
## Stromal_cell_GSM260675 Stromal_cell_GSM239613
## Stromal_cell_GSM260681 Stromal_cell_GSM239616
## Stromal_cell_GSM260667 Stromal_cell_GSM239668
## Stromal_cell_GSM260678 Stromal_cell_GSM239669
## Stromal_cell_GSM260676 Stromal_cell_GSM250019
## Stromal_cell_GSM260679 Stromal_cell_GSM250020
## Stromal_cell_GSM260686 Stromal_cell_GSM250021
## Stromal_cell_GSM260680 Stromal_cell_GSM260305
## Stromal_cell_GSM260683 Stromal_cell_GSM260306
## Stromal_cell_GSM451153 Stromal_cell_GSM260307
## Stromal_cell_GSM451156 Stromal_cell_GSM260308
## Stromal_cell_GSM260661 Stromal_cell_GSM260309
## Stromal_cell_GSM260662 Stromal_cell_GSM260310
## Stromal_cell_GSM250019 Stromal_cell_GSM260311
## Stromal_cell_GSM260657 Stromal_cell_GSM260312
## Stromal_cell_GSM451154 Stromal_cell_GSM260313
## Stromal_cell_GSM451157 Stromal_cell_GSM260314
## Stromal_cell_GSM451158 Stromal_cell_GSM260321
## Stromal_cell_GSM250020 Stromal_cell_GSM260322
## Stromal_cell_GSM260658 Stromal_cell_GSM260657
## Stromal_cell_GSM250021 Stromal_cell_GSM260658
## Stromal_cell_GSM260659 Stromal_cell_GSM260659
## Stromal_cell_GSM451155 Stromal_cell_GSM260661
## Stromal_cell_GSM451160 Stromal_cell_GSM260662
## Stromal_cell_GSM451161 Stromal_cell_GSM260663
## _B_Li7_liver Stromal_cell_GSM260664
## _B_SNU878_liver Stromal_cell_GSM260665
## Stromal_cell_GSM346959 Stromal_cell_GSM260666
## Stromal_cell_GSM346960 Stromal_cell_GSM260667
## Stromal_cell_GSM116106 Stromal_cell_GSM260668
## Stromal_cell_GSM116103 Stromal_cell_GSM260669
## Stromal_cell_GSM116101 Stromal_cell_GSM260670
## Stromal_cell_GSM116102 Stromal_cell_GSM260671
## Stromal_cell_GSM116104 Stromal_cell_GSM260672
## Stromal_cell_GSM116105 Stromal_cell_GSM260673
## Stromal_cell_GSM346941 Stromal_cell_GSM260674
## Stromal_cell_GSM346942 Stromal_cell_GSM260675
## Stromal_cell_GSM492834 Stromal_cell_GSM260676
## Stromal_cell_GSM492835 Stromal_cell_GSM260678
## Stromal_cell_GSM322374 Stromal_cell_GSM260679
## Stromal_cell_GSM322375 Stromal_cell_GSM260680
## Stromal_cell_GSM322376 Stromal_cell_GSM260681
## Stromal_cell_GSM322377 Stromal_cell_GSM260682
## Stromal_cell_GSM413840 Stromal_cell_GSM260683
## Stromal_cell_GSM469126 Stromal_cell_GSM260684
## Stromal_cell_GSM469130 Stromal_cell_GSM260685
## Stromal_cell_GSM469127 Stromal_cell_GSM260686
## Stromal_cell_GSM469128 Blood_cell_GSM260689
## Stromal_cell_GSM469129 Blood_cell_GSM260690
## Stromal_cell_GSM346944 Blood_cell_GSM260691
## Stromal_cell_GSM469125 Blood_cell_GSM260692
## Stromal_cell_GSM346943 Blood_cell_GSM260693
## Stromal_cell_GSM469132 Blood_cell_GSM260694
## Stromal_cell_GSM469131 Blood_cell_GSM260695
## Stromal_cell_GSM469136 Blood_cell_GSM260696
## Stromal_cell_GSM265498 Blood_cell_GSM260697
## Stromal_cell_GSM265494 Blood_cell_GSM260698
## Stromal_cell_GSM265496 Blood_cell_GSM260699
## Stromal_cell_GSM265495 Blood_cell_GSM260700
## Stromal_cell_GSM265497 Blood_cell_GSM260701
## Stromal_cell_GSM265499 Blood_cell_GSM264755
## Neuro_endo_GSM92232 Blood_cell_GSM264756
## Neuro_endo_GSM92234 Blood_cell_GSM264757
## Neuro_endo_GSM92231 Blood_cell_GSM264758
## Neuro_endo_GSM92233 Stromal_cell_GSM265494
## Neuro_endo_GSM469411 Stromal_cell_GSM265495
## Neuro_endo_GSM469412 Stromal_cell_GSM265496
## _B_SNU761_liver Stromal_cell_GSM265497
## _C_SKHEP1_liver Stromal_cell_GSM265498
## _B_SNU182_liver Stromal_cell_GSM265499
## _B_SNU449_liver Blood_cell_GSM279572
## _B_HLE_liver Blood_cell_GSM279573
## _B_HLF_liver Blood_cell_GSM279574
## _B_SNU475_liver Blood_cell_GSM279575
## _B_SNU886_liver Blood_cell_GSM279576
## _B_JHH4_liver Blood_cell_GSM279577
## _B_SNU387_liver Blood_cell_GSM279578
## _B_SNU423_liver Blood_cell_GSM279579
## _B_JHH2_liver Blood_cell_GSM279580
## _C_JHH6_liver Blood_cell_GSM279581
## Hepatocytes_GSM456350 Blood_cell_GSM279582
## Hepatocytes_GSM456349 Blood_cell_GSM279583
## Hepatocytes_GSM456351 Blood_cell_GSM279584
## _A_Alexander cells_liver Blood_cell_GSM286015
## _A_PLC_PRF_5_liver Blood_cell_GSM286017
## _A_HuH6_liver Blood_cell_GSM286086
## _A_huH1_liver Blood_cell_GSM286087
## _A_HuH7_liver Blood_cell_GSM286088
## _A_JHH5_liver Blood_cell_GSM286089
## _A_JHH7_liver Blood_cell_GSM286090
## _A_Hep 3B2.17_liver Blood_cell_GSM286091
## _A_C3A_liver Stromal_cell_GSM287216
## _A_Hep G2_liver Stromal_cell_GSM287217
## _C_JHH1_liver Stromal_cell_GSM287218
## Blood_cell_GSM359754 Stromal_cell_GSM287219
## Blood_cell_GSM359760 Stromal_cell_GSM287220
## Blood_cell_GSM359758 Stromal_cell_GSM287222
## Blood_cell_GSM359753 Blood_cell_GSM289612
## Blood_cell_GSM359759 Blood_cell_GSM289613
## Blood_cell_GSM359332 Blood_cell_GSM289614
## Blood_cell_GSM359755 Blood_cell_GSM289615
## Blood_cell_GSM300401 Blood_cell_GSM289616
## Blood_cell_GSM300399 Blood_cell_GSM289617
## Blood_cell_GSM300403 Blood_cell_GSM289618
## Blood_cell_GSM300404 Blood_cell_GSM290414
## Blood_cell_GSM300392 Blood_cell_GSM290415
## Blood_cell_GSM300394 Blood_cell_GSM290420
## Blood_cell_GSM300398 Blood_cell_GSM290421
## Blood_cell_GSM300393 Blood_cell_GSM290423
## Blood_cell_GSM300402 Other_GSM299095
## Blood_cell_GSM300390 Other_GSM299096
## Blood_cell_GSM300389 Other_GSM299097
## Blood_cell_GSM300395 Other_GSM299098
## Blood_cell_GSM514672 Other_GSM299099
## Blood_cell_GSM514670 Other_GSM299100
## Blood_cell_GSM514669 Blood_cell_GSM299556
## Blood_cell_GSM343806 Blood_cell_GSM299557
## Blood_cell_GSM343822 Blood_cell_GSM299558
## Blood_cell_GSM343824 Blood_cell_GSM299559
## Blood_cell_GSM514671 Blood_cell_GSM299560
## Blood_cell_GSM343817 Blood_cell_GSM299561
## Blood_cell_GSM343819 Blood_cell_GSM299562
## Blood_cell_GSM343815 Blood_cell_GSM299563
## Blood_cell_GSM343805 Blood_cell_GSM299564
## Blood_cell_GSM343831 Blood_cell_GSM299565
## Blood_cell_GSM343807 Blood_cell_GSM300389
## Blood_cell_GSM343813 Blood_cell_GSM300390
## Blood_cell_GSM343825 Blood_cell_GSM300392
## Blood_cell_GSM343811 Blood_cell_GSM300393
## Blood_cell_GSM343829 Blood_cell_GSM300394
## Blood_cell_GSM343808 Blood_cell_GSM300395
## Blood_cell_GSM343810 Blood_cell_GSM300398
## Blood_cell_GSM343812 Blood_cell_GSM300399
## Blood_cell_GSM419989 Blood_cell_GSM300401
## Blood_cell_GSM343828 Blood_cell_GSM300402
## Blood_cell_GSM343830 Blood_cell_GSM300403
## Blood_cell_GSM343816 Blood_cell_GSM300404
## Blood_cell_GSM343818 ES_iPS_germ_GSM304260
## Blood_cell_GSM419988 ES_iPS_germ_GSM304261
## Blood_cell_GSM343802 ES_iPS_germ_GSM304262
## Blood_cell_GSM343804 Blood_cell_GSM305430
## Blood_cell_GSM419992 Blood_cell_GSM305432
## Blood_cell_GSM419987 Blood_cell_GSM305433
## Blood_cell_GSM419990 Blood_cell_GSM305434
## Blood_cell_GSM419991 Blood_cell_GSM305435
## Blood_cell_GSM343821 Blood_cell_GSM305436
## Blood_cell_GSM343809 Blood_cell_GSM305437
## Blood_cell_GSM343814 Blood_cell_GSM305438
## Blood_cell_GSM343826 Blood_cell_GSM305439
## Blood_cell_GSM343803 Blood_cell_GSM305440
## Blood_cell_GSM343827 Blood_cell_GSM305441
## Blood_cell_GSM343820 Blood_cell_GSM305442
## Blood_cell_GSM343823 Endothel_GSM305784
## Blood_cell_GSM132924 Endothel_GSM305785
## Blood_cell_GSM132926 Endothel_GSM305786
## Blood_cell_GSM132928 Endothel_GSM305787
## Blood_cell_GSM132927 Blood_cell_GSM310429
## Blood_cell_GSM132919 Blood_cell_GSM310430
## Blood_cell_GSM132923 Blood_cell_GSM310431
## Blood_cell_GSM132925 Blood_cell_GSM310432
## Blood_cell_GSM132921 Blood_cell_GSM310433
## Blood_cell_GSM132922 Blood_cell_GSM310434
## Blood_cell_GSM132929 Blood_cell_GSM310435
## Blood_cell_GSM132930 Blood_cell_GSM310436
## Blood_cell_GSM181930 Blood_cell_GSM310437
## Blood_cell_GSM181971 Blood_cell_GSM310438
## Blood_cell_GSM181973 Blood_cell_GSM310439
## Blood_cell_GSM181982 Blood_cell_GSM310440
## Blood_cell_GSM181997 Blood_cell_GSM320543
## Blood_cell_GSM181931 Blood_cell_GSM320544
## Blood_cell_GSM181933 Blood_cell_GSM320545
## Blood_cell_GSM181857 Blood_cell_GSM320546
## Blood_cell_GSM181978 Blood_cell_GSM320547
## Blood_cell_GSM140953 Blood_cell_GSM320548
## Blood_cell_GSM160534 Blood_cell_GSM320549
## Blood_cell_GSM140968 Blood_cell_GSM320550
## Blood_cell_GSM140969 Blood_cell_GSM320551
## Blood_cell_GSM286088 Blood_cell_GSM320552
## Blood_cell_GSM320546 Stromal_cell_GSM322374
## Blood_cell_GSM320544 Stromal_cell_GSM322375
## Blood_cell_GSM320548 Stromal_cell_GSM322376
## Blood_cell_GSM320550 Stromal_cell_GSM322377
## Blood_cell_GSM320552 Endothel_GSM330313
## Blood_cell_GSM320545 Endothel_GSM330314
## Blood_cell_GSM320551 Endothel_GSM330315
## Blood_cell_GSM320547 Endothel_GSM330316
## Blood_cell_GSM320549 Endothel_GSM335393
## Blood_cell_GSM140973 Endothel_GSM335395
## Blood_cell_GSM320543 Endothel_GSM335396
## Blood_cell_GSM183305 Endothel_GSM335851
## Blood_cell_GSM183393 Endothel_GSM335859
## Blood_cell_GSM183482 Endothel_GSM335904
## Blood_cell_GSM183467 Endothel_GSM335906
## Blood_cell_GSM183392 Endothel_GSM336559
## Blood_cell_GSM183466 Blood_cell_GSM343802
## Blood_cell_GSM183316 Blood_cell_GSM343803
## Blood_cell_GSM183463 Blood_cell_GSM343804
## Blood_cell_GSM183394 Blood_cell_GSM343805
## Blood_cell_GSM183462 Blood_cell_GSM343806
## Blood_cell_GSM183306 Blood_cell_GSM343807
## Blood_cell_GSM183217 Blood_cell_GSM343808
## Blood_cell_GSM183315 Blood_cell_GSM343809
## Blood_cell_GSM183464 Blood_cell_GSM343810
## Blood_cell_GSM183465 Blood_cell_GSM343811
## Blood_cell_GSM183487 Blood_cell_GSM343812
## Blood_cell_GSM183209 Blood_cell_GSM343813
## Blood_cell_GSM183165 Blood_cell_GSM343814
## Blood_cell_GSM183486 Blood_cell_GSM343815
## Blood_cell_GSM183196 Blood_cell_GSM343816
## Blood_cell_GSM183483 Blood_cell_GSM343817
## Blood_cell_GSM183485 Blood_cell_GSM343818
## Blood_cell_GSM183193 Blood_cell_GSM343819
## Blood_cell_GSM183201 Blood_cell_GSM343820
## Blood_cell_GSM183484 Blood_cell_GSM343821
## Blood_cell_GSM112670 Blood_cell_GSM343822
## Blood_cell_GSM112490 Blood_cell_GSM343823
## Blood_cell_GSM112668 Blood_cell_GSM343824
## Blood_cell_GSM112540 Blood_cell_GSM343825
## Blood_cell_GSM112491 Blood_cell_GSM343826
## Blood_cell_GSM112669 Blood_cell_GSM343827
## Blood_cell_GSM160530 Blood_cell_GSM343828
## Blood_cell_GSM112664 Blood_cell_GSM343829
## Blood_cell_GSM112666 Blood_cell_GSM343830
## Blood_cell_GSM112661 Blood_cell_GSM343831
## Blood_cell_GSM112665 Stromal_cell_GSM346941
## Blood_cell_GSM305433 Stromal_cell_GSM346942
## Blood_cell_GSM305435 Stromal_cell_GSM346943
## Blood_cell_GSM305441 Stromal_cell_GSM346944
## Blood_cell_GSM305442 Endothel_GSM346951
## Blood_cell_GSM305437 Endothel_GSM346952
## Blood_cell_GSM305439 Stromal_cell_GSM346959
## Blood_cell_GSM182000 Stromal_cell_GSM346960
## Blood_cell_GSM182002 ES_iPS_germ_GSM347916
## Blood_cell_GSM556663 ES_iPS_germ_GSM347917
## Blood_cell_GSM556665 ES_iPS_germ_GSM347918
## Blood_cell_GSM286091 Stromal_cell_GSM347919
## Blood_cell_GSM286089 Stromal_cell_GSM347920
## Blood_cell_GSM286090 ES_iPS_germ_GSM347922
## Blood_cell_GSM286017 ES_iPS_germ_GSM347923
## Blood_cell_GSM286086 ES_iPS_germ_GSM347924
## Blood_cell_GSM286087 ES_iPS_germ_GSM347925
## Blood_cell_GSM112541 Blood_cell_GSM349848
## Blood_cell_GSM260694 Blood_cell_GSM349849
## Blood_cell_GSM260695 Blood_cell_GSM350084
## Blood_cell_GSM260691 Blood_cell_GSM350085
## Blood_cell_GSM260692 Blood_cell_GSM350086
## Blood_cell_GSM260689 Blood_cell_GSM359332
## Blood_cell_GSM260697 Blood_cell_GSM359753
## Blood_cell_GSM260699 Blood_cell_GSM359754
## Blood_cell_GSM260693 Blood_cell_GSM359755
## Blood_cell_GSM260690 Blood_cell_GSM359758
## Blood_cell_GSM260696 Blood_cell_GSM359759
## Blood_cell_GSM260701 Blood_cell_GSM359760
## Blood_cell_GSM260698 Blood_cell_GSM361266
## Blood_cell_GSM260700 Blood_cell_GSM361272
## Blood_cell_GSM181974 Blood_cell_GSM361278
## Blood_cell_GSM181976 Blood_cell_GSM361283
## Blood_cell_GSM181981 Blood_cell_GSM361285
## Blood_cell_GSM181984 Stromal_cell_GSM366942
## Blood_cell_GSM181999 ES_iPS_germ_GSM367061
## Blood_cell_GSM299559 ES_iPS_germ_GSM367062
## Blood_cell_GSM299560 ES_iPS_germ_GSM367219
## Blood_cell_GSM299565 ES_iPS_germ_GSM367240
## Blood_cell_GSM160532 ES_iPS_germ_GSM367241
## Blood_cell_GSM299564 ES_iPS_germ_GSM367242
## Blood_cell_GSM140970 ES_iPS_germ_GSM367243
## Blood_cell_GSM286015 ES_iPS_germ_GSM367244
## Blood_cell_GSM112667 ES_iPS_germ_GSM367245
## Blood_cell_GSM140971 ES_iPS_germ_GSM367258
## Blood_cell_GSM181972 Stromal_cell_GSM372142
## Blood_cell_GSM264757 Stromal_cell_GSM372144
## Blood_cell_GSM264758 Stromal_cell_GSM372146
## Blood_cell_GSM264755 ES_iPS_germ_GSM372154
## Blood_cell_GSM264756 ES_iPS_germ_GSM372155
## Blood_cell_GSM160536 ES_iPS_germ_GSM372156
## Blood_cell_GSM181983 ES_iPS_germ_GSM372157
## Blood_cell_GSM181998 ES_iPS_germ_GSM372158
## Blood_cell_GSM181980 ES_iPS_germ_GSM372159
## Blood_cell_GSM182001 Blood_cell_GSM372800
## Blood_cell_GSM549579 Blood_cell_GSM372801
## Blood_cell_GSM549577 Blood_cell_GSM372802
## Blood_cell_GSM549578 Blood_cell_GSM372803
## Blood_cell_GSM549581 Blood_cell_GSM372804
## Blood_cell_GSM549580 Blood_cell_GSM372805
## Blood_cell_GSM549583 Blood_cell_GSM372806
## Blood_cell_GSM549582 Blood_cell_GSM372807
## Blood_cell_GSM549584 Blood_cell_GSM372808
## Blood_cell_GSM361278 Blood_cell_GSM372809
## Blood_cell_GSM361266 Blood_cell_GSM372810
## Blood_cell_GSM361272 Blood_cell_GSM372811
## Blood_cell_GSM361283 Blood_cell_GSM372812
## Blood_cell_GSM361285 Blood_cell_GSM372813
## Blood_cell_GSM466518 Blood_cell_GSM372814
## Blood_cell_GSM466519 Blood_cell_GSM372815
## Blood_cell_GSM466515 Blood_cell_GSM372816
## Blood_cell_GSM466516 Blood_cell_GSM372817
## Blood_cell_GSM466517 Blood_cell_GSM372818
## _C_NCIH684_liver ES_iPS_germ_GSM378811
## Blood_cell_GSM289612 Blood_cell_GSM381339
## Blood_cell_GSM289618 Blood_cell_GSM381340
## Blood_cell_GSM289615 Blood_cell_GSM381341
## Blood_cell_GSM289617 Blood_cell_GSM381342
## Blood_cell_GSM289616 Blood_cell_GSM381343
## Blood_cell_GSM289613 Blood_cell_GSM381344
## Blood_cell_GSM289614 Blood_cell_GSM381345
## Blood_cell_GSM483483 Blood_cell_GSM381346
## Blood_cell_GSM483484 Endothel_GSM385333
## Blood_cell_GSM483485 Endothel_GSM385338
## Blood_cell_GSM483480 Endothel_GSM385350
## Blood_cell_GSM483481 Endothel_GSM385353
## Blood_cell_GSM483482 Stromal_cell_GSM402707
## Blood_cell_GSM488980 ES_iPS_germ_GSM402717
## Blood_cell_GSM488981 ES_iPS_germ_GSM402752
## Blood_cell_GSM488970 ES_iPS_germ_GSM402806
## Blood_cell_GSM488971 Endothel_GSM410666
## Blood_cell_GSM488968 Endothel_GSM410667
## Blood_cell_GSM488969 Endothel_GSM410668
## Blood_cell_GSM488982 Endothel_GSM410669
## Blood_cell_GSM488983 Endothel_GSM410672
## Blood_cell_GSM488974 Endothel_GSM410673
## Blood_cell_GSM488975 Endothel_GSM410674
## Blood_cell_GSM189447 Endothel_GSM410675
## Blood_cell_GSM189448 Endothel_GSM410678
## Blood_cell_GSM189452 Endothel_GSM410679
## Blood_cell_GSM189454 Endothel_GSM410680
## Blood_cell_GSM189451 Endothel_GSM410681
## Blood_cell_GSM189453 Endothel_GSM410684
## Blood_cell_GSM189449 Endothel_GSM410685
## Blood_cell_GSM189450 Endothel_GSM410686
## Blood_cell_GSM305432 Endothel_GSM410687
## Blood_cell_GSM305436 Stromal_cell_GSM413840
## Blood_cell_GSM305430 Stromal_cell_GSM413842
## Blood_cell_GSM305434 Stromal_cell_GSM413846
## Blood_cell_GSM182003 Stromal_cell_GSM413847
## Blood_cell_GSM182004 Stromal_cell_GSM413848
## Blood_cell_GSM181932 Blood_cell_GSM419987
## Blood_cell_GSM181934 Blood_cell_GSM419988
## Blood_cell_GSM299557 Blood_cell_GSM419989
## Blood_cell_GSM299558 Blood_cell_GSM419990
## Blood_cell_GSM305438 Blood_cell_GSM419991
## Blood_cell_GSM299563 Blood_cell_GSM419992
## Blood_cell_GSM299562 Blood_cell_GSM422109
## Blood_cell_GSM305440 Blood_cell_GSM422110
## Blood_cell_GSM422113 Blood_cell_GSM422111
## Blood_cell_GSM422114 Blood_cell_GSM422112
## Blood_cell_GSM422116 Blood_cell_GSM422113
## Blood_cell_GSM422111 Blood_cell_GSM422114
## Blood_cell_GSM422112 Blood_cell_GSM422116
## Blood_cell_GSM422110 Blood_cell_GSM432175
## Blood_cell_GSM140244 Blood_cell_GSM432176
## Blood_cell_GSM422109 Blood_cell_GSM432177
## Blood_cell_GSM1209586 Blood_cell_GSM432178
## Blood_cell_GSM1209588 Blood_cell_GSM432179
## Blood_cell_GSM1209589 Blood_cell_GSM432180
## Blood_cell_GSM1209585 Stromal_cell_GSM451153
## Blood_cell_GSM1209587 Stromal_cell_GSM451154
## Blood_cell_GSM1209560 Stromal_cell_GSM451155
## Blood_cell_GSM1209558 Stromal_cell_GSM451156
## Blood_cell_GSM1209559 Stromal_cell_GSM451157
## Blood_cell_GSM140245 Stromal_cell_GSM451158
## Blood_cell_GSM140248 Stromal_cell_GSM451160
## Blood_cell_GSM140249 Stromal_cell_GSM451161
## Blood_cell_GSM178554 Hepatocytes_GSM456349
## Blood_cell_GSM178555 Hepatocytes_GSM456350
## Blood_cell_GSM140246 Hepatocytes_GSM456351
## Blood_cell_GSM140247 Blood_cell_GSM466515
## Blood_cell_GSM178550 Blood_cell_GSM466516
## Blood_cell_GSM178551 Blood_cell_GSM466517
## Blood_cell_GSM178557 Blood_cell_GSM466518
## Blood_cell_GSM488978 Blood_cell_GSM466519
## Blood_cell_GSM178549 Stromal_cell_GSM469125
## Blood_cell_GSM178552 Stromal_cell_GSM469126
## Blood_cell_GSM178553 Stromal_cell_GSM469127
## Blood_cell_GSM488979 Stromal_cell_GSM469128
## Blood_cell_GSM178558 Stromal_cell_GSM469129
## Blood_cell_GSM299561 Stromal_cell_GSM469130
## Blood_cell_GSM178556 Stromal_cell_GSM469131
## Blood_cell_GSM299556 Stromal_cell_GSM469132
## Blood_cell_GSM432176 Stromal_cell_GSM469136
## Blood_cell_GSM350084 ES_iPS_germ_GSM469409
## Blood_cell_GSM350085 Neuro_endo_GSM469411
## Blood_cell_GSM350086 Neuro_endo_GSM469412
## Blood_cell_GSM432180 Endothel_GSM476782
## Blood_cell_GSM432178 Endothel_GSM476783
## Blood_cell_GSM432179 Endothel_GSM476784
## Blood_cell_GSM432175 Endothel_GSM476785
## Blood_cell_GSM432177 Endothel_GSM476786
## Blood_cell_GSM556647 Blood_cell_GSM483480
## Blood_cell_GSM488976 Blood_cell_GSM483481
## Blood_cell_GSM488977 Blood_cell_GSM483482
## Blood_cell_GSM1209591 Blood_cell_GSM483483
## Blood_cell_GSM1209595 Blood_cell_GSM483484
## Blood_cell_GSM1209594 Blood_cell_GSM483485
## Blood_cell_GSM1209592 Blood_cell_GSM488968
## Blood_cell_GSM1209593 Blood_cell_GSM488969
## Blood_cell_GSM1209598 Blood_cell_GSM488970
## Blood_cell_GSM1209597 Blood_cell_GSM488971
## Blood_cell_GSM1209596 Blood_cell_GSM488972
## Blood_cell_GSM1209599 Blood_cell_GSM488973
## Blood_cell_GSM279574 Blood_cell_GSM488974
## Blood_cell_GSM279580 Blood_cell_GSM488975
## Blood_cell_GSM279577 Blood_cell_GSM488976
## Blood_cell_GSM279578 Blood_cell_GSM488977
## Blood_cell_GSM279581 Blood_cell_GSM488978
## Blood_cell_GSM279582 Blood_cell_GSM488979
## Blood_cell_GSM279575 Blood_cell_GSM488980
## Blood_cell_GSM279576 Blood_cell_GSM488981
## Blood_cell_GSM279572 Blood_cell_GSM488982
## Blood_cell_GSM279573 Blood_cell_GSM488983
## Blood_cell_GSM279583 Endothel_GSM492832
## Blood_cell_GSM279579 Endothel_GSM492833
## Blood_cell_GSM279584 Stromal_cell_GSM492834
## Blood_cell_GSM372813 Stromal_cell_GSM492835
## Blood_cell_GSM372804 Stromal_cell_GSM500995
## Blood_cell_GSM372803 ES_iPS_germ_GSM500996
## Blood_cell_GSM372810 ES_iPS_germ_GSM500997
## Blood_cell_GSM372816 ES_iPS_germ_GSM500998
## Blood_cell_GSM372818 ES_iPS_germ_GSM500999
## Blood_cell_GSM372800 ES_iPS_germ_GSM501000
## Blood_cell_GSM372809 Stromal_cell_GSM501001
## Blood_cell_GSM372811 Stromal_cell_GSM501002
## Blood_cell_GSM372808 Stromal_cell_GSM501003
## Blood_cell_GSM372817 ES_iPS_germ_GSM501004
## Blood_cell_GSM372806 ES_iPS_germ_GSM501005
## Blood_cell_GSM372807 ES_iPS_germ_GSM501006
## Blood_cell_GSM372801 ES_iPS_germ_GSM501007
## Blood_cell_GSM372802 ES_iPS_germ_GSM501008
## Blood_cell_GSM372812 ES_iPS_germ_GSM501009
## Blood_cell_GSM372805 Stromal_cell_GSM501890
## Blood_cell_GSM372814 Stromal_cell_GSM501891
## Blood_cell_GSM372815 Stromal_cell_GSM501892
## Blood_cell_GSM1209577 Stromal_cell_GSM501893
## Blood_cell_GSM1209580 Stromal_cell_GSM501894
## Blood_cell_GSM1209578 Stromal_cell_GSM501895
## Blood_cell_GSM1209579 Blood_cell_GSM514669
## Blood_cell_GSM1209582 Blood_cell_GSM514670
## Blood_cell_GSM1209561 Blood_cell_GSM514671
## Blood_cell_GSM1209576 Blood_cell_GSM514672
## Blood_cell_GSM1209563 ES_iPS_germ_GSM530601
## Blood_cell_GSM1209573 ES_iPS_germ_GSM530602
## Blood_cell_GSM1209562 ES_iPS_germ_GSM530603
## Blood_cell_GSM1209583 ES_iPS_germ_GSM530604
## Blood_cell_GSM1209575 ES_iPS_germ_GSM530605
## Blood_cell_GSM1209581 ES_iPS_germ_GSM530606
## Blood_cell_GSM1209574 ES_iPS_germ_GSM530607
## Blood_cell_GSM1209584 ES_iPS_germ_GSM530611
## Blood_cell_GSM153893 Neuro_endo_GSM53382
## Blood_cell_GSM154073 Neuro_endo_GSM53383
## Blood_cell_GSM154084 Neuro_endo_GSM53384
## Blood_cell_GSM154077 Neuro_endo_GSM53385
## Blood_cell_GSM154078 Neuro_endo_GSM53386
## Blood_cell_GSM154081 Neuro_endo_GSM53387
## Blood_cell_GSM547998 ES_iPS_germ_GSM540714
## Blood_cell_GSM548000 ES_iPS_germ_GSM540715
## Blood_cell_GSM547999 ES_iPS_germ_GSM540716
## Blood_cell_GSM548001 Blood_cell_GSM542578
## Blood_cell_GSM542578 Blood_cell_GSM547998
## Blood_cell_GSM349848 Blood_cell_GSM547999
## Blood_cell_GSM349849 Blood_cell_GSM548000
## Blood_cell_GSM310429 Blood_cell_GSM548001
## Blood_cell_GSM198944 Blood_cell_GSM549577
## Blood_cell_GSM198945 Blood_cell_GSM549578
## Blood_cell_GSM198942 Blood_cell_GSM549579
## Blood_cell_GSM198943 Blood_cell_GSM549580
## Blood_cell_GSM381341 Blood_cell_GSM549581
## Blood_cell_GSM381343 Blood_cell_GSM549582
## Blood_cell_GSM381339 Blood_cell_GSM549583
## Blood_cell_GSM381345 Blood_cell_GSM549584
## Blood_cell_GSM381340 Endothel_GSM551183
## Blood_cell_GSM381346 Blood_cell_GSM556647
## Blood_cell_GSM381342 Blood_cell_GSM556663
## Blood_cell_GSM381344 Blood_cell_GSM556665
## Blood_cell_GSM310440 Neuro_endo_GSM92231
## Blood_cell_GSM488972 Neuro_endo_GSM92232
## Blood_cell_GSM488973 Neuro_endo_GSM92233
## Blood_cell_GSM310431 Neuro_endo_GSM92234
## Blood_cell_GSM310437 _A_Alexander cells_liver
## Blood_cell_GSM310439 _A_C3A_liver
## Blood_cell_GSM310432 _A_Hep 3B2.17_liver
## Blood_cell_GSM310436 _A_Hep G2_liver
## Blood_cell_GSM310433 _A_huH1_liver
## Blood_cell_GSM310434 _A_HuH6_liver
## Blood_cell_GSM310435 _A_HuH7_liver
## Blood_cell_GSM310430 _A_JHH5_liver
## Blood_cell_GSM310438 _A_JHH7_liver
## Blood_cell_GSM290420 _A_PLC_PRF_5_liver
## Blood_cell_GSM290414 _B_HLE_liver
## Blood_cell_GSM290415 _B_HLF_liver
## Blood_cell_GSM290421 _B_JHH2_liver
## Blood_cell_GSM290423 _B_JHH4_liver
## Blood_cell_GSM1209554 _B_Li7_liver
## Blood_cell_GSM1209569 _B_SNU182_liver
## Blood_cell_GSM1209556 _B_SNU387_liver
## Blood_cell_GSM1209572 _B_SNU423_liver
## Blood_cell_GSM1209555 _B_SNU449_liver
## Blood_cell_GSM1209557 _B_SNU475_liver
## Blood_cell_GSM1209564 _B_SNU761_liver
## Blood_cell_GSM1209568 _B_SNU878_liver
## Blood_cell_GSM1209566 _B_SNU886_liver
## Blood_cell_GSM1209570 _C_JHH1_liver
## Blood_cell_GSM1209567 _C_JHH6_liver
## Blood_cell_GSM1209590 _C_NCIH684_liver
## Blood_cell_GSM1209565 _C_SKHEP1_liver
## Blood_cell_GSM1209571 _C_SNU398_liver
## row_clst.labels.row_clst.order.
## ES_iPS_germ_GSM530604 ES_iPS_germ_GSM530604
## ES_iPS_germ_GSM530606 ES_iPS_germ_GSM530606
## ES_iPS_germ_GSM530601 ES_iPS_germ_GSM530601
## ES_iPS_germ_GSM530603 ES_iPS_germ_GSM530603
## ES_iPS_germ_GSM372156 ES_iPS_germ_GSM372156
## ES_iPS_germ_GSM372154 ES_iPS_germ_GSM372154
## ES_iPS_germ_GSM372155 ES_iPS_germ_GSM372155
## ES_iPS_germ_GSM469409 ES_iPS_germ_GSM469409
## ES_iPS_germ_GSM172866 ES_iPS_germ_GSM172866
## ES_iPS_germ_GSM172865 ES_iPS_germ_GSM172865
## ES_iPS_germ_GSM172870 ES_iPS_germ_GSM172870
## ES_iPS_germ_GSM172868 ES_iPS_germ_GSM172868
## ES_iPS_germ_GSM172867 ES_iPS_germ_GSM172867
## ES_iPS_germ_GSM172869 ES_iPS_germ_GSM172869
## ES_iPS_germ_GSM540716 ES_iPS_germ_GSM540716
## ES_iPS_germ_GSM540714 ES_iPS_germ_GSM540714
## ES_iPS_germ_GSM540715 ES_iPS_germ_GSM540715
## ES_iPS_germ_GSM402806 ES_iPS_germ_GSM402806
## ES_iPS_germ_GSM402717 ES_iPS_germ_GSM402717
## ES_iPS_germ_GSM402752 ES_iPS_germ_GSM402752
## ES_iPS_germ_GSM530611 ES_iPS_germ_GSM530611
## _C_SNU398_liver _C_SNU398_liver
## ES_iPS_germ_GSM501008 ES_iPS_germ_GSM501008
## ES_iPS_germ_GSM501007 ES_iPS_germ_GSM501007
## ES_iPS_germ_GSM501009 ES_iPS_germ_GSM501009
## ES_iPS_germ_GSM501004 ES_iPS_germ_GSM501004
## ES_iPS_germ_GSM501006 ES_iPS_germ_GSM501006
## ES_iPS_germ_GSM500996 ES_iPS_germ_GSM500996
## ES_iPS_germ_GSM500997 ES_iPS_germ_GSM500997
## ES_iPS_germ_GSM501000 ES_iPS_germ_GSM501000
## ES_iPS_germ_GSM500998 ES_iPS_germ_GSM500998
## ES_iPS_germ_GSM500999 ES_iPS_germ_GSM500999
## ES_iPS_germ_GSM347922 ES_iPS_germ_GSM347922
## ES_iPS_germ_GSM501005 ES_iPS_germ_GSM501005
## ES_iPS_germ_GSM378811 ES_iPS_germ_GSM378811
## ES_iPS_germ_GSM347917 ES_iPS_germ_GSM347917
## ES_iPS_germ_GSM347916 ES_iPS_germ_GSM347916
## ES_iPS_germ_GSM347918 ES_iPS_germ_GSM347918
## ES_iPS_germ_GSM347924 ES_iPS_germ_GSM347924
## ES_iPS_germ_GSM347923 ES_iPS_germ_GSM347923
## ES_iPS_germ_GSM347925 ES_iPS_germ_GSM347925
## ES_iPS_germ_GSM225042 ES_iPS_germ_GSM225042
## ES_iPS_germ_GSM230294 ES_iPS_germ_GSM230294
## ES_iPS_germ_GSM530602 ES_iPS_germ_GSM530602
## ES_iPS_germ_GSM530605 ES_iPS_germ_GSM530605
## ES_iPS_germ_GSM530607 ES_iPS_germ_GSM530607
## ES_iPS_germ_GSM372157 ES_iPS_germ_GSM372157
## ES_iPS_germ_GSM372159 ES_iPS_germ_GSM372159
## ES_iPS_germ_GSM367062 ES_iPS_germ_GSM367062
## ES_iPS_germ_GSM372158 ES_iPS_germ_GSM372158
## ES_iPS_germ_GSM367243 ES_iPS_germ_GSM367243
## ES_iPS_germ_GSM367244 ES_iPS_germ_GSM367244
## ES_iPS_germ_GSM367245 ES_iPS_germ_GSM367245
## ES_iPS_germ_GSM367258 ES_iPS_germ_GSM367258
## ES_iPS_germ_GSM367061 ES_iPS_germ_GSM367061
## ES_iPS_germ_GSM367241 ES_iPS_germ_GSM367241
## ES_iPS_germ_GSM367242 ES_iPS_germ_GSM367242
## ES_iPS_germ_GSM367219 ES_iPS_germ_GSM367219
## ES_iPS_germ_GSM367240 ES_iPS_germ_GSM367240
## Neuro_endo_GSM53385 Neuro_endo_GSM53385
## Neuro_endo_GSM53386 Neuro_endo_GSM53386
## Neuro_endo_GSM53382 Neuro_endo_GSM53382
## Neuro_endo_GSM53384 Neuro_endo_GSM53384
## Neuro_endo_GSM53383 Neuro_endo_GSM53383
## Neuro_endo_GSM53387 Neuro_endo_GSM53387
## ES_iPS_germ_GSM304262 ES_iPS_germ_GSM304262
## ES_iPS_germ_GSM304260 ES_iPS_germ_GSM304260
## ES_iPS_germ_GSM304261 ES_iPS_germ_GSM304261
## ES_iPS_germ_GSM158468 ES_iPS_germ_GSM158468
## ES_iPS_germ_GSM158470 ES_iPS_germ_GSM158470
## Other_GSM173542 Other_GSM173542
## Other_GSM173541 Other_GSM173541
## Other_GSM173543 Other_GSM173543
## Other_GSM173538 Other_GSM173538
## Other_GSM173539 Other_GSM173539
## Other_GSM173546 Other_GSM173546
## Other_GSM173544 Other_GSM173544
## Other_GSM173540 Other_GSM173540
## Other_GSM173545 Other_GSM173545
## Other_GSM173552 Other_GSM173552
## Other_GSM173550 Other_GSM173550
## Other_GSM173551 Other_GSM173551
## Other_GSM173535 Other_GSM173535
## Other_GSM173556 Other_GSM173556
## Other_GSM173553 Other_GSM173553
## Other_GSM173536 Other_GSM173536
## Other_GSM173537 Other_GSM173537
## Other_GSM173554 Other_GSM173554
## Other_GSM173555 Other_GSM173555
## Other_GSM173534 Other_GSM173534
## Other_GSM173547 Other_GSM173547
## Other_GSM173548 Other_GSM173548
## Other_GSM173549 Other_GSM173549
## Other_GSM173532 Other_GSM173532
## Other_GSM173533 Other_GSM173533
## Other_GSM119354 Other_GSM119354
## Other_GSM119362 Other_GSM119362
## Other_GSM119360 Other_GSM119360
## Other_GSM119357 Other_GSM119357
## Other_GSM119359 Other_GSM119359
## Other_GSM119361 Other_GSM119361
## Other_GSM119371 Other_GSM119371
## Other_GSM119366 Other_GSM119366
## Other_GSM119369 Other_GSM119369
## Other_GSM119372 Other_GSM119372
## Other_GSM299096 Other_GSM299096
## Other_GSM299095 Other_GSM299095
## Other_GSM299097 Other_GSM299097
## Other_GSM299098 Other_GSM299098
## Other_GSM299099 Other_GSM299099
## Other_GSM299100 Other_GSM299100
## Endothel_GSM410679 Endothel_GSM410679
## Endothel_GSM410680 Endothel_GSM410680
## Endothel_GSM410681 Endothel_GSM410681
## Endothel_GSM410678 Endothel_GSM410678
## Endothel_GSM410666 Endothel_GSM410666
## Endothel_GSM410669 Endothel_GSM410669
## Endothel_GSM410667 Endothel_GSM410667
## Endothel_GSM410668 Endothel_GSM410668
## Endothel_GSM410675 Endothel_GSM410675
## Endothel_GSM410684 Endothel_GSM410684
## Endothel_GSM410673 Endothel_GSM410673
## Endothel_GSM410672 Endothel_GSM410672
## Endothel_GSM410674 Endothel_GSM410674
## Endothel_GSM410685 Endothel_GSM410685
## Endothel_GSM410686 Endothel_GSM410686
## Endothel_GSM410687 Endothel_GSM410687
## Endothel_GSM143898 Endothel_GSM143898
## Endothel_GSM143900 Endothel_GSM143900
## Endothel_GSM143910 Endothel_GSM143910
## Endothel_GSM143914 Endothel_GSM143914
## Endothel_GSM143717 Endothel_GSM143717
## Endothel_GSM143907 Endothel_GSM143907
## Endothel_GSM305787 Endothel_GSM305787
## Endothel_GSM305784 Endothel_GSM305784
## Endothel_GSM305785 Endothel_GSM305785
## Endothel_GSM476784 Endothel_GSM476784
## Endothel_GSM476783 Endothel_GSM476783
## Endothel_GSM476786 Endothel_GSM476786
## Endothel_GSM476782 Endothel_GSM476782
## Endothel_GSM476785 Endothel_GSM476785
## Endothel_GSM492832 Endothel_GSM492832
## Endothel_GSM492833 Endothel_GSM492833
## Endothel_GSM141252 Endothel_GSM141252
## Endothel_GSM141253 Endothel_GSM141253
## Endothel_GSM141251 Endothel_GSM141251
## Endothel_GSM141255 Endothel_GSM141255
## Endothel_GSM330314 Endothel_GSM330314
## Endothel_GSM143726 Endothel_GSM143726
## Endothel_GSM335859 Endothel_GSM335859
## Endothel_GSM330313 Endothel_GSM330313
## Endothel_GSM335393 Endothel_GSM335393
## Endothel_GSM335851 Endothel_GSM335851
## Endothel_GSM335395 Endothel_GSM335395
## Endothel_GSM385350 Endothel_GSM385350
## Endothel_GSM385353 Endothel_GSM385353
## Endothel_GSM143727 Endothel_GSM143727
## Endothel_GSM385333 Endothel_GSM385333
## Endothel_GSM385338 Endothel_GSM385338
## Endothel_GSM346952 Endothel_GSM346952
## Endothel_GSM346951 Endothel_GSM346951
## Endothel_GSM551183 Endothel_GSM551183
## Endothel_GSM330315 Endothel_GSM330315
## Endothel_GSM335904 Endothel_GSM335904
## Endothel_GSM330316 Endothel_GSM330316
## Endothel_GSM335396 Endothel_GSM335396
## Endothel_GSM335906 Endothel_GSM335906
## Endothel_GSM336559 Endothel_GSM336559
## Endothel_GSM143729 Endothel_GSM143729
## Endothel_GSM143728 Endothel_GSM143728
## Endothel_GSM143731 Endothel_GSM143731
## Endothel_GSM143732 Endothel_GSM143732
## Endothel_GSM143733 Endothel_GSM143733
## Endothel_GSM143730 Endothel_GSM143730
## Endothel_GSM305786 Endothel_GSM305786
## Stromal_cell_GSM413842 Stromal_cell_GSM413842
## Stromal_cell_GSM372142 Stromal_cell_GSM372142
## Stromal_cell_GSM372144 Stromal_cell_GSM372144
## Stromal_cell_GSM372146 Stromal_cell_GSM372146
## Stromal_cell_GSM366942 Stromal_cell_GSM366942
## Stromal_cell_GSM402707 Stromal_cell_GSM402707
## Stromal_cell_GSM500995 Stromal_cell_GSM500995
## Stromal_cell_GSM347919 Stromal_cell_GSM347919
## Stromal_cell_GSM347920 Stromal_cell_GSM347920
## Stromal_cell_GSM501001 Stromal_cell_GSM501001
## Stromal_cell_GSM501002 Stromal_cell_GSM501002
## Stromal_cell_GSM501003 Stromal_cell_GSM501003
## Stromal_cell_GSM501890 Stromal_cell_GSM501890
## Stromal_cell_GSM501895 Stromal_cell_GSM501895
## Stromal_cell_GSM501891 Stromal_cell_GSM501891
## Stromal_cell_GSM501894 Stromal_cell_GSM501894
## Stromal_cell_GSM501892 Stromal_cell_GSM501892
## Stromal_cell_GSM501893 Stromal_cell_GSM501893
## Stromal_cell_GSM260309 Stromal_cell_GSM260309
## Stromal_cell_GSM260311 Stromal_cell_GSM260311
## Stromal_cell_GSM260312 Stromal_cell_GSM260312
## Stromal_cell_GSM260310 Stromal_cell_GSM260310
## Stromal_cell_GSM260313 Stromal_cell_GSM260313
## Stromal_cell_GSM260305 Stromal_cell_GSM260305
## Stromal_cell_GSM260306 Stromal_cell_GSM260306
## Stromal_cell_GSM260308 Stromal_cell_GSM260308
## Stromal_cell_GSM260321 Stromal_cell_GSM260321
## Stromal_cell_GSM260307 Stromal_cell_GSM260307
## Stromal_cell_GSM260314 Stromal_cell_GSM260314
## Stromal_cell_GSM260322 Stromal_cell_GSM260322
## Stromal_cell_GSM287219 Stromal_cell_GSM287219
## Stromal_cell_GSM287218 Stromal_cell_GSM287218
## Stromal_cell_GSM287222 Stromal_cell_GSM287222
## Stromal_cell_GSM287217 Stromal_cell_GSM287217
## Stromal_cell_GSM287216 Stromal_cell_GSM287216
## Stromal_cell_GSM287220 Stromal_cell_GSM287220
## Stromal_cell_GSM239260 Stromal_cell_GSM239260
## Stromal_cell_GSM239379 Stromal_cell_GSM239379
## Stromal_cell_GSM239457 Stromal_cell_GSM239457
## Stromal_cell_GSM239606 Stromal_cell_GSM239606
## Stromal_cell_GSM239612 Stromal_cell_GSM239612
## Stromal_cell_GSM239613 Stromal_cell_GSM239613
## Stromal_cell_GSM239668 Stromal_cell_GSM239668
## Stromal_cell_GSM239616 Stromal_cell_GSM239616
## Stromal_cell_GSM239669 Stromal_cell_GSM239669
## Stromal_cell_GSM413847 Stromal_cell_GSM413847
## Stromal_cell_GSM413846 Stromal_cell_GSM413846
## Stromal_cell_GSM413848 Stromal_cell_GSM413848
## Stromal_cell_GSM260669 Stromal_cell_GSM260669
## Stromal_cell_GSM260672 Stromal_cell_GSM260672
## Stromal_cell_GSM260671 Stromal_cell_GSM260671
## Stromal_cell_GSM260670 Stromal_cell_GSM260670
## Stromal_cell_GSM260673 Stromal_cell_GSM260673
## Stromal_cell_GSM260682 Stromal_cell_GSM260682
## Stromal_cell_GSM260685 Stromal_cell_GSM260685
## Stromal_cell_GSM260674 Stromal_cell_GSM260674
## Stromal_cell_GSM260684 Stromal_cell_GSM260684
## Stromal_cell_GSM260666 Stromal_cell_GSM260666
## Stromal_cell_GSM260665 Stromal_cell_GSM260665
## Stromal_cell_GSM260663 Stromal_cell_GSM260663
## Stromal_cell_GSM260668 Stromal_cell_GSM260668
## Stromal_cell_GSM260664 Stromal_cell_GSM260664
## Stromal_cell_GSM260675 Stromal_cell_GSM260675
## Stromal_cell_GSM260681 Stromal_cell_GSM260681
## Stromal_cell_GSM260667 Stromal_cell_GSM260667
## Stromal_cell_GSM260678 Stromal_cell_GSM260678
## Stromal_cell_GSM260676 Stromal_cell_GSM260676
## Stromal_cell_GSM260679 Stromal_cell_GSM260679
## Stromal_cell_GSM260686 Stromal_cell_GSM260686
## Stromal_cell_GSM260680 Stromal_cell_GSM260680
## Stromal_cell_GSM260683 Stromal_cell_GSM260683
## Stromal_cell_GSM451153 Stromal_cell_GSM451153
## Stromal_cell_GSM451156 Stromal_cell_GSM451156
## Stromal_cell_GSM260661 Stromal_cell_GSM260661
## Stromal_cell_GSM260662 Stromal_cell_GSM260662
## Stromal_cell_GSM250019 Stromal_cell_GSM250019
## Stromal_cell_GSM260657 Stromal_cell_GSM260657
## Stromal_cell_GSM451154 Stromal_cell_GSM451154
## Stromal_cell_GSM451157 Stromal_cell_GSM451157
## Stromal_cell_GSM451158 Stromal_cell_GSM451158
## Stromal_cell_GSM250020 Stromal_cell_GSM250020
## Stromal_cell_GSM260658 Stromal_cell_GSM260658
## Stromal_cell_GSM250021 Stromal_cell_GSM250021
## Stromal_cell_GSM260659 Stromal_cell_GSM260659
## Stromal_cell_GSM451155 Stromal_cell_GSM451155
## Stromal_cell_GSM451160 Stromal_cell_GSM451160
## Stromal_cell_GSM451161 Stromal_cell_GSM451161
## _B_Li7_liver _B_Li7_liver
## _B_SNU878_liver _B_SNU878_liver
## Stromal_cell_GSM346959 Stromal_cell_GSM346959
## Stromal_cell_GSM346960 Stromal_cell_GSM346960
## Stromal_cell_GSM116106 Stromal_cell_GSM116106
## Stromal_cell_GSM116103 Stromal_cell_GSM116103
## Stromal_cell_GSM116101 Stromal_cell_GSM116101
## Stromal_cell_GSM116102 Stromal_cell_GSM116102
## Stromal_cell_GSM116104 Stromal_cell_GSM116104
## Stromal_cell_GSM116105 Stromal_cell_GSM116105
## Stromal_cell_GSM346941 Stromal_cell_GSM346941
## Stromal_cell_GSM346942 Stromal_cell_GSM346942
## Stromal_cell_GSM492834 Stromal_cell_GSM492834
## Stromal_cell_GSM492835 Stromal_cell_GSM492835
## Stromal_cell_GSM322374 Stromal_cell_GSM322374
## Stromal_cell_GSM322375 Stromal_cell_GSM322375
## Stromal_cell_GSM322376 Stromal_cell_GSM322376
## Stromal_cell_GSM322377 Stromal_cell_GSM322377
## Stromal_cell_GSM413840 Stromal_cell_GSM413840
## Stromal_cell_GSM469126 Stromal_cell_GSM469126
## Stromal_cell_GSM469130 Stromal_cell_GSM469130
## Stromal_cell_GSM469127 Stromal_cell_GSM469127
## Stromal_cell_GSM469128 Stromal_cell_GSM469128
## Stromal_cell_GSM469129 Stromal_cell_GSM469129
## Stromal_cell_GSM346944 Stromal_cell_GSM346944
## Stromal_cell_GSM469125 Stromal_cell_GSM469125
## Stromal_cell_GSM346943 Stromal_cell_GSM346943
## Stromal_cell_GSM469132 Stromal_cell_GSM469132
## Stromal_cell_GSM469131 Stromal_cell_GSM469131
## Stromal_cell_GSM469136 Stromal_cell_GSM469136
## Stromal_cell_GSM265498 Stromal_cell_GSM265498
## Stromal_cell_GSM265494 Stromal_cell_GSM265494
## Stromal_cell_GSM265496 Stromal_cell_GSM265496
## Stromal_cell_GSM265495 Stromal_cell_GSM265495
## Stromal_cell_GSM265497 Stromal_cell_GSM265497
## Stromal_cell_GSM265499 Stromal_cell_GSM265499
## Neuro_endo_GSM92232 Neuro_endo_GSM92232
## Neuro_endo_GSM92234 Neuro_endo_GSM92234
## Neuro_endo_GSM92231 Neuro_endo_GSM92231
## Neuro_endo_GSM92233 Neuro_endo_GSM92233
## Neuro_endo_GSM469411 Neuro_endo_GSM469411
## Neuro_endo_GSM469412 Neuro_endo_GSM469412
## _B_SNU761_liver _B_SNU761_liver
## _C_SKHEP1_liver _C_SKHEP1_liver
## _B_SNU182_liver _B_SNU182_liver
## _B_SNU449_liver _B_SNU449_liver
## _B_HLE_liver _B_HLE_liver
## _B_HLF_liver _B_HLF_liver
## _B_SNU475_liver _B_SNU475_liver
## _B_SNU886_liver _B_SNU886_liver
## _B_JHH4_liver _B_JHH4_liver
## _B_SNU387_liver _B_SNU387_liver
## _B_SNU423_liver _B_SNU423_liver
## _B_JHH2_liver _B_JHH2_liver
## _C_JHH6_liver _C_JHH6_liver
## Hepatocytes_GSM456350 Hepatocytes_GSM456350
## Hepatocytes_GSM456349 Hepatocytes_GSM456349
## Hepatocytes_GSM456351 Hepatocytes_GSM456351
## _A_Alexander cells_liver _A_Alexander cells_liver
## _A_PLC_PRF_5_liver _A_PLC_PRF_5_liver
## _A_HuH6_liver _A_HuH6_liver
## _A_huH1_liver _A_huH1_liver
## _A_HuH7_liver _A_HuH7_liver
## _A_JHH5_liver _A_JHH5_liver
## _A_JHH7_liver _A_JHH7_liver
## _A_Hep 3B2.17_liver _A_Hep 3B2.17_liver
## _A_C3A_liver _A_C3A_liver
## _A_Hep G2_liver _A_Hep G2_liver
## _C_JHH1_liver _C_JHH1_liver
## Blood_cell_GSM359754 Blood_cell_GSM359754
## Blood_cell_GSM359760 Blood_cell_GSM359760
## Blood_cell_GSM359758 Blood_cell_GSM359758
## Blood_cell_GSM359753 Blood_cell_GSM359753
## Blood_cell_GSM359759 Blood_cell_GSM359759
## Blood_cell_GSM359332 Blood_cell_GSM359332
## Blood_cell_GSM359755 Blood_cell_GSM359755
## Blood_cell_GSM300401 Blood_cell_GSM300401
## Blood_cell_GSM300399 Blood_cell_GSM300399
## Blood_cell_GSM300403 Blood_cell_GSM300403
## Blood_cell_GSM300404 Blood_cell_GSM300404
## Blood_cell_GSM300392 Blood_cell_GSM300392
## Blood_cell_GSM300394 Blood_cell_GSM300394
## Blood_cell_GSM300398 Blood_cell_GSM300398
## Blood_cell_GSM300393 Blood_cell_GSM300393
## Blood_cell_GSM300402 Blood_cell_GSM300402
## Blood_cell_GSM300390 Blood_cell_GSM300390
## Blood_cell_GSM300389 Blood_cell_GSM300389
## Blood_cell_GSM300395 Blood_cell_GSM300395
## Blood_cell_GSM514672 Blood_cell_GSM514672
## Blood_cell_GSM514670 Blood_cell_GSM514670
## Blood_cell_GSM514669 Blood_cell_GSM514669
## Blood_cell_GSM343806 Blood_cell_GSM343806
## Blood_cell_GSM343822 Blood_cell_GSM343822
## Blood_cell_GSM343824 Blood_cell_GSM343824
## Blood_cell_GSM514671 Blood_cell_GSM514671
## Blood_cell_GSM343817 Blood_cell_GSM343817
## Blood_cell_GSM343819 Blood_cell_GSM343819
## Blood_cell_GSM343815 Blood_cell_GSM343815
## Blood_cell_GSM343805 Blood_cell_GSM343805
## Blood_cell_GSM343831 Blood_cell_GSM343831
## Blood_cell_GSM343807 Blood_cell_GSM343807
## Blood_cell_GSM343813 Blood_cell_GSM343813
## Blood_cell_GSM343825 Blood_cell_GSM343825
## Blood_cell_GSM343811 Blood_cell_GSM343811
## Blood_cell_GSM343829 Blood_cell_GSM343829
## Blood_cell_GSM343808 Blood_cell_GSM343808
## Blood_cell_GSM343810 Blood_cell_GSM343810
## Blood_cell_GSM343812 Blood_cell_GSM343812
## Blood_cell_GSM419989 Blood_cell_GSM419989
## Blood_cell_GSM343828 Blood_cell_GSM343828
## Blood_cell_GSM343830 Blood_cell_GSM343830
## Blood_cell_GSM343816 Blood_cell_GSM343816
## Blood_cell_GSM343818 Blood_cell_GSM343818
## Blood_cell_GSM419988 Blood_cell_GSM419988
## Blood_cell_GSM343802 Blood_cell_GSM343802
## Blood_cell_GSM343804 Blood_cell_GSM343804
## Blood_cell_GSM419992 Blood_cell_GSM419992
## Blood_cell_GSM419987 Blood_cell_GSM419987
## Blood_cell_GSM419990 Blood_cell_GSM419990
## Blood_cell_GSM419991 Blood_cell_GSM419991
## Blood_cell_GSM343821 Blood_cell_GSM343821
## Blood_cell_GSM343809 Blood_cell_GSM343809
## Blood_cell_GSM343814 Blood_cell_GSM343814
## Blood_cell_GSM343826 Blood_cell_GSM343826
## Blood_cell_GSM343803 Blood_cell_GSM343803
## Blood_cell_GSM343827 Blood_cell_GSM343827
## Blood_cell_GSM343820 Blood_cell_GSM343820
## Blood_cell_GSM343823 Blood_cell_GSM343823
## Blood_cell_GSM132924 Blood_cell_GSM132924
## Blood_cell_GSM132926 Blood_cell_GSM132926
## Blood_cell_GSM132928 Blood_cell_GSM132928
## Blood_cell_GSM132927 Blood_cell_GSM132927
## Blood_cell_GSM132919 Blood_cell_GSM132919
## Blood_cell_GSM132923 Blood_cell_GSM132923
## Blood_cell_GSM132925 Blood_cell_GSM132925
## Blood_cell_GSM132921 Blood_cell_GSM132921
## Blood_cell_GSM132922 Blood_cell_GSM132922
## Blood_cell_GSM132929 Blood_cell_GSM132929
## Blood_cell_GSM132930 Blood_cell_GSM132930
## Blood_cell_GSM181930 Blood_cell_GSM181930
## Blood_cell_GSM181971 Blood_cell_GSM181971
## Blood_cell_GSM181973 Blood_cell_GSM181973
## Blood_cell_GSM181982 Blood_cell_GSM181982
## Blood_cell_GSM181997 Blood_cell_GSM181997
## Blood_cell_GSM181931 Blood_cell_GSM181931
## Blood_cell_GSM181933 Blood_cell_GSM181933
## Blood_cell_GSM181857 Blood_cell_GSM181857
## Blood_cell_GSM181978 Blood_cell_GSM181978
## Blood_cell_GSM140953 Blood_cell_GSM140953
## Blood_cell_GSM160534 Blood_cell_GSM160534
## Blood_cell_GSM140968 Blood_cell_GSM140968
## Blood_cell_GSM140969 Blood_cell_GSM140969
## Blood_cell_GSM286088 Blood_cell_GSM286088
## Blood_cell_GSM320546 Blood_cell_GSM320546
## Blood_cell_GSM320544 Blood_cell_GSM320544
## Blood_cell_GSM320548 Blood_cell_GSM320548
## Blood_cell_GSM320550 Blood_cell_GSM320550
## Blood_cell_GSM320552 Blood_cell_GSM320552
## Blood_cell_GSM320545 Blood_cell_GSM320545
## Blood_cell_GSM320551 Blood_cell_GSM320551
## Blood_cell_GSM320547 Blood_cell_GSM320547
## Blood_cell_GSM320549 Blood_cell_GSM320549
## Blood_cell_GSM140973 Blood_cell_GSM140973
## Blood_cell_GSM320543 Blood_cell_GSM320543
## Blood_cell_GSM183305 Blood_cell_GSM183305
## Blood_cell_GSM183393 Blood_cell_GSM183393
## Blood_cell_GSM183482 Blood_cell_GSM183482
## Blood_cell_GSM183467 Blood_cell_GSM183467
## Blood_cell_GSM183392 Blood_cell_GSM183392
## Blood_cell_GSM183466 Blood_cell_GSM183466
## Blood_cell_GSM183316 Blood_cell_GSM183316
## Blood_cell_GSM183463 Blood_cell_GSM183463
## Blood_cell_GSM183394 Blood_cell_GSM183394
## Blood_cell_GSM183462 Blood_cell_GSM183462
## Blood_cell_GSM183306 Blood_cell_GSM183306
## Blood_cell_GSM183217 Blood_cell_GSM183217
## Blood_cell_GSM183315 Blood_cell_GSM183315
## Blood_cell_GSM183464 Blood_cell_GSM183464
## Blood_cell_GSM183465 Blood_cell_GSM183465
## Blood_cell_GSM183487 Blood_cell_GSM183487
## Blood_cell_GSM183209 Blood_cell_GSM183209
## Blood_cell_GSM183165 Blood_cell_GSM183165
## Blood_cell_GSM183486 Blood_cell_GSM183486
## Blood_cell_GSM183196 Blood_cell_GSM183196
## Blood_cell_GSM183483 Blood_cell_GSM183483
## Blood_cell_GSM183485 Blood_cell_GSM183485
## Blood_cell_GSM183193 Blood_cell_GSM183193
## Blood_cell_GSM183201 Blood_cell_GSM183201
## Blood_cell_GSM183484 Blood_cell_GSM183484
## Blood_cell_GSM112670 Blood_cell_GSM112670
## Blood_cell_GSM112490 Blood_cell_GSM112490
## Blood_cell_GSM112668 Blood_cell_GSM112668
## Blood_cell_GSM112540 Blood_cell_GSM112540
## Blood_cell_GSM112491 Blood_cell_GSM112491
## Blood_cell_GSM112669 Blood_cell_GSM112669
## Blood_cell_GSM160530 Blood_cell_GSM160530
## Blood_cell_GSM112664 Blood_cell_GSM112664
## Blood_cell_GSM112666 Blood_cell_GSM112666
## Blood_cell_GSM112661 Blood_cell_GSM112661
## Blood_cell_GSM112665 Blood_cell_GSM112665
## Blood_cell_GSM305433 Blood_cell_GSM305433
## Blood_cell_GSM305435 Blood_cell_GSM305435
## Blood_cell_GSM305441 Blood_cell_GSM305441
## Blood_cell_GSM305442 Blood_cell_GSM305442
## Blood_cell_GSM305437 Blood_cell_GSM305437
## Blood_cell_GSM305439 Blood_cell_GSM305439
## Blood_cell_GSM182000 Blood_cell_GSM182000
## Blood_cell_GSM182002 Blood_cell_GSM182002
## Blood_cell_GSM556663 Blood_cell_GSM556663
## Blood_cell_GSM556665 Blood_cell_GSM556665
## Blood_cell_GSM286091 Blood_cell_GSM286091
## Blood_cell_GSM286089 Blood_cell_GSM286089
## Blood_cell_GSM286090 Blood_cell_GSM286090
## Blood_cell_GSM286017 Blood_cell_GSM286017
## Blood_cell_GSM286086 Blood_cell_GSM286086
## Blood_cell_GSM286087 Blood_cell_GSM286087
## Blood_cell_GSM112541 Blood_cell_GSM112541
## Blood_cell_GSM260694 Blood_cell_GSM260694
## Blood_cell_GSM260695 Blood_cell_GSM260695
## Blood_cell_GSM260691 Blood_cell_GSM260691
## Blood_cell_GSM260692 Blood_cell_GSM260692
## Blood_cell_GSM260689 Blood_cell_GSM260689
## Blood_cell_GSM260697 Blood_cell_GSM260697
## Blood_cell_GSM260699 Blood_cell_GSM260699
## Blood_cell_GSM260693 Blood_cell_GSM260693
## Blood_cell_GSM260690 Blood_cell_GSM260690
## Blood_cell_GSM260696 Blood_cell_GSM260696
## Blood_cell_GSM260701 Blood_cell_GSM260701
## Blood_cell_GSM260698 Blood_cell_GSM260698
## Blood_cell_GSM260700 Blood_cell_GSM260700
## Blood_cell_GSM181974 Blood_cell_GSM181974
## Blood_cell_GSM181976 Blood_cell_GSM181976
## Blood_cell_GSM181981 Blood_cell_GSM181981
## Blood_cell_GSM181984 Blood_cell_GSM181984
## Blood_cell_GSM181999 Blood_cell_GSM181999
## Blood_cell_GSM299559 Blood_cell_GSM299559
## Blood_cell_GSM299560 Blood_cell_GSM299560
## Blood_cell_GSM299565 Blood_cell_GSM299565
## Blood_cell_GSM160532 Blood_cell_GSM160532
## Blood_cell_GSM299564 Blood_cell_GSM299564
## Blood_cell_GSM140970 Blood_cell_GSM140970
## Blood_cell_GSM286015 Blood_cell_GSM286015
## Blood_cell_GSM112667 Blood_cell_GSM112667
## Blood_cell_GSM140971 Blood_cell_GSM140971
## Blood_cell_GSM181972 Blood_cell_GSM181972
## Blood_cell_GSM264757 Blood_cell_GSM264757
## Blood_cell_GSM264758 Blood_cell_GSM264758
## Blood_cell_GSM264755 Blood_cell_GSM264755
## Blood_cell_GSM264756 Blood_cell_GSM264756
## Blood_cell_GSM160536 Blood_cell_GSM160536
## Blood_cell_GSM181983 Blood_cell_GSM181983
## Blood_cell_GSM181998 Blood_cell_GSM181998
## Blood_cell_GSM181980 Blood_cell_GSM181980
## Blood_cell_GSM182001 Blood_cell_GSM182001
## Blood_cell_GSM549579 Blood_cell_GSM549579
## Blood_cell_GSM549577 Blood_cell_GSM549577
## Blood_cell_GSM549578 Blood_cell_GSM549578
## Blood_cell_GSM549581 Blood_cell_GSM549581
## Blood_cell_GSM549580 Blood_cell_GSM549580
## Blood_cell_GSM549583 Blood_cell_GSM549583
## Blood_cell_GSM549582 Blood_cell_GSM549582
## Blood_cell_GSM549584 Blood_cell_GSM549584
## Blood_cell_GSM361278 Blood_cell_GSM361278
## Blood_cell_GSM361266 Blood_cell_GSM361266
## Blood_cell_GSM361272 Blood_cell_GSM361272
## Blood_cell_GSM361283 Blood_cell_GSM361283
## Blood_cell_GSM361285 Blood_cell_GSM361285
## Blood_cell_GSM466518 Blood_cell_GSM466518
## Blood_cell_GSM466519 Blood_cell_GSM466519
## Blood_cell_GSM466515 Blood_cell_GSM466515
## Blood_cell_GSM466516 Blood_cell_GSM466516
## Blood_cell_GSM466517 Blood_cell_GSM466517
## _C_NCIH684_liver _C_NCIH684_liver
## Blood_cell_GSM289612 Blood_cell_GSM289612
## Blood_cell_GSM289618 Blood_cell_GSM289618
## Blood_cell_GSM289615 Blood_cell_GSM289615
## Blood_cell_GSM289617 Blood_cell_GSM289617
## Blood_cell_GSM289616 Blood_cell_GSM289616
## Blood_cell_GSM289613 Blood_cell_GSM289613
## Blood_cell_GSM289614 Blood_cell_GSM289614
## Blood_cell_GSM483483 Blood_cell_GSM483483
## Blood_cell_GSM483484 Blood_cell_GSM483484
## Blood_cell_GSM483485 Blood_cell_GSM483485
## Blood_cell_GSM483480 Blood_cell_GSM483480
## Blood_cell_GSM483481 Blood_cell_GSM483481
## Blood_cell_GSM483482 Blood_cell_GSM483482
## Blood_cell_GSM488980 Blood_cell_GSM488980
## Blood_cell_GSM488981 Blood_cell_GSM488981
## Blood_cell_GSM488970 Blood_cell_GSM488970
## Blood_cell_GSM488971 Blood_cell_GSM488971
## Blood_cell_GSM488968 Blood_cell_GSM488968
## Blood_cell_GSM488969 Blood_cell_GSM488969
## Blood_cell_GSM488982 Blood_cell_GSM488982
## Blood_cell_GSM488983 Blood_cell_GSM488983
## Blood_cell_GSM488974 Blood_cell_GSM488974
## Blood_cell_GSM488975 Blood_cell_GSM488975
## Blood_cell_GSM189447 Blood_cell_GSM189447
## Blood_cell_GSM189448 Blood_cell_GSM189448
## Blood_cell_GSM189452 Blood_cell_GSM189452
## Blood_cell_GSM189454 Blood_cell_GSM189454
## Blood_cell_GSM189451 Blood_cell_GSM189451
## Blood_cell_GSM189453 Blood_cell_GSM189453
## Blood_cell_GSM189449 Blood_cell_GSM189449
## Blood_cell_GSM189450 Blood_cell_GSM189450
## Blood_cell_GSM305432 Blood_cell_GSM305432
## Blood_cell_GSM305436 Blood_cell_GSM305436
## Blood_cell_GSM305430 Blood_cell_GSM305430
## Blood_cell_GSM305434 Blood_cell_GSM305434
## Blood_cell_GSM182003 Blood_cell_GSM182003
## Blood_cell_GSM182004 Blood_cell_GSM182004
## Blood_cell_GSM181932 Blood_cell_GSM181932
## Blood_cell_GSM181934 Blood_cell_GSM181934
## Blood_cell_GSM299557 Blood_cell_GSM299557
## Blood_cell_GSM299558 Blood_cell_GSM299558
## Blood_cell_GSM305438 Blood_cell_GSM305438
## Blood_cell_GSM299563 Blood_cell_GSM299563
## Blood_cell_GSM299562 Blood_cell_GSM299562
## Blood_cell_GSM305440 Blood_cell_GSM305440
## Blood_cell_GSM422113 Blood_cell_GSM422113
## Blood_cell_GSM422114 Blood_cell_GSM422114
## Blood_cell_GSM422116 Blood_cell_GSM422116
## Blood_cell_GSM422111 Blood_cell_GSM422111
## Blood_cell_GSM422112 Blood_cell_GSM422112
## Blood_cell_GSM422110 Blood_cell_GSM422110
## Blood_cell_GSM140244 Blood_cell_GSM140244
## Blood_cell_GSM422109 Blood_cell_GSM422109
## Blood_cell_GSM1209586 Blood_cell_GSM1209586
## Blood_cell_GSM1209588 Blood_cell_GSM1209588
## Blood_cell_GSM1209589 Blood_cell_GSM1209589
## Blood_cell_GSM1209585 Blood_cell_GSM1209585
## Blood_cell_GSM1209587 Blood_cell_GSM1209587
## Blood_cell_GSM1209560 Blood_cell_GSM1209560
## Blood_cell_GSM1209558 Blood_cell_GSM1209558
## Blood_cell_GSM1209559 Blood_cell_GSM1209559
## Blood_cell_GSM140245 Blood_cell_GSM140245
## Blood_cell_GSM140248 Blood_cell_GSM140248
## Blood_cell_GSM140249 Blood_cell_GSM140249
## Blood_cell_GSM178554 Blood_cell_GSM178554
## Blood_cell_GSM178555 Blood_cell_GSM178555
## Blood_cell_GSM140246 Blood_cell_GSM140246
## Blood_cell_GSM140247 Blood_cell_GSM140247
## Blood_cell_GSM178550 Blood_cell_GSM178550
## Blood_cell_GSM178551 Blood_cell_GSM178551
## Blood_cell_GSM178557 Blood_cell_GSM178557
## Blood_cell_GSM488978 Blood_cell_GSM488978
## Blood_cell_GSM178549 Blood_cell_GSM178549
## Blood_cell_GSM178552 Blood_cell_GSM178552
## Blood_cell_GSM178553 Blood_cell_GSM178553
## Blood_cell_GSM488979 Blood_cell_GSM488979
## Blood_cell_GSM178558 Blood_cell_GSM178558
## Blood_cell_GSM299561 Blood_cell_GSM299561
## Blood_cell_GSM178556 Blood_cell_GSM178556
## Blood_cell_GSM299556 Blood_cell_GSM299556
## Blood_cell_GSM432176 Blood_cell_GSM432176
## Blood_cell_GSM350084 Blood_cell_GSM350084
## Blood_cell_GSM350085 Blood_cell_GSM350085
## Blood_cell_GSM350086 Blood_cell_GSM350086
## Blood_cell_GSM432180 Blood_cell_GSM432180
## Blood_cell_GSM432178 Blood_cell_GSM432178
## Blood_cell_GSM432179 Blood_cell_GSM432179
## Blood_cell_GSM432175 Blood_cell_GSM432175
## Blood_cell_GSM432177 Blood_cell_GSM432177
## Blood_cell_GSM556647 Blood_cell_GSM556647
## Blood_cell_GSM488976 Blood_cell_GSM488976
## Blood_cell_GSM488977 Blood_cell_GSM488977
## Blood_cell_GSM1209591 Blood_cell_GSM1209591
## Blood_cell_GSM1209595 Blood_cell_GSM1209595
## Blood_cell_GSM1209594 Blood_cell_GSM1209594
## Blood_cell_GSM1209592 Blood_cell_GSM1209592
## Blood_cell_GSM1209593 Blood_cell_GSM1209593
## Blood_cell_GSM1209598 Blood_cell_GSM1209598
## Blood_cell_GSM1209597 Blood_cell_GSM1209597
## Blood_cell_GSM1209596 Blood_cell_GSM1209596
## Blood_cell_GSM1209599 Blood_cell_GSM1209599
## Blood_cell_GSM279574 Blood_cell_GSM279574
## Blood_cell_GSM279580 Blood_cell_GSM279580
## Blood_cell_GSM279577 Blood_cell_GSM279577
## Blood_cell_GSM279578 Blood_cell_GSM279578
## Blood_cell_GSM279581 Blood_cell_GSM279581
## Blood_cell_GSM279582 Blood_cell_GSM279582
## Blood_cell_GSM279575 Blood_cell_GSM279575
## Blood_cell_GSM279576 Blood_cell_GSM279576
## Blood_cell_GSM279572 Blood_cell_GSM279572
## Blood_cell_GSM279573 Blood_cell_GSM279573
## Blood_cell_GSM279583 Blood_cell_GSM279583
## Blood_cell_GSM279579 Blood_cell_GSM279579
## Blood_cell_GSM279584 Blood_cell_GSM279584
## Blood_cell_GSM372813 Blood_cell_GSM372813
## Blood_cell_GSM372804 Blood_cell_GSM372804
## Blood_cell_GSM372803 Blood_cell_GSM372803
## Blood_cell_GSM372810 Blood_cell_GSM372810
## Blood_cell_GSM372816 Blood_cell_GSM372816
## Blood_cell_GSM372818 Blood_cell_GSM372818
## Blood_cell_GSM372800 Blood_cell_GSM372800
## Blood_cell_GSM372809 Blood_cell_GSM372809
## Blood_cell_GSM372811 Blood_cell_GSM372811
## Blood_cell_GSM372808 Blood_cell_GSM372808
## Blood_cell_GSM372817 Blood_cell_GSM372817
## Blood_cell_GSM372806 Blood_cell_GSM372806
## Blood_cell_GSM372807 Blood_cell_GSM372807
## Blood_cell_GSM372801 Blood_cell_GSM372801
## Blood_cell_GSM372802 Blood_cell_GSM372802
## Blood_cell_GSM372812 Blood_cell_GSM372812
## Blood_cell_GSM372805 Blood_cell_GSM372805
## Blood_cell_GSM372814 Blood_cell_GSM372814
## Blood_cell_GSM372815 Blood_cell_GSM372815
## Blood_cell_GSM1209577 Blood_cell_GSM1209577
## Blood_cell_GSM1209580 Blood_cell_GSM1209580
## Blood_cell_GSM1209578 Blood_cell_GSM1209578
## Blood_cell_GSM1209579 Blood_cell_GSM1209579
## Blood_cell_GSM1209582 Blood_cell_GSM1209582
## Blood_cell_GSM1209561 Blood_cell_GSM1209561
## Blood_cell_GSM1209576 Blood_cell_GSM1209576
## Blood_cell_GSM1209563 Blood_cell_GSM1209563
## Blood_cell_GSM1209573 Blood_cell_GSM1209573
## Blood_cell_GSM1209562 Blood_cell_GSM1209562
## Blood_cell_GSM1209583 Blood_cell_GSM1209583
## Blood_cell_GSM1209575 Blood_cell_GSM1209575
## Blood_cell_GSM1209581 Blood_cell_GSM1209581
## Blood_cell_GSM1209574 Blood_cell_GSM1209574
## Blood_cell_GSM1209584 Blood_cell_GSM1209584
## Blood_cell_GSM153893 Blood_cell_GSM153893
## Blood_cell_GSM154073 Blood_cell_GSM154073
## Blood_cell_GSM154084 Blood_cell_GSM154084
## Blood_cell_GSM154077 Blood_cell_GSM154077
## Blood_cell_GSM154078 Blood_cell_GSM154078
## Blood_cell_GSM154081 Blood_cell_GSM154081
## Blood_cell_GSM547998 Blood_cell_GSM547998
## Blood_cell_GSM548000 Blood_cell_GSM548000
## Blood_cell_GSM547999 Blood_cell_GSM547999
## Blood_cell_GSM548001 Blood_cell_GSM548001
## Blood_cell_GSM542578 Blood_cell_GSM542578
## Blood_cell_GSM349848 Blood_cell_GSM349848
## Blood_cell_GSM349849 Blood_cell_GSM349849
## Blood_cell_GSM310429 Blood_cell_GSM310429
## Blood_cell_GSM198944 Blood_cell_GSM198944
## Blood_cell_GSM198945 Blood_cell_GSM198945
## Blood_cell_GSM198942 Blood_cell_GSM198942
## Blood_cell_GSM198943 Blood_cell_GSM198943
## Blood_cell_GSM381341 Blood_cell_GSM381341
## Blood_cell_GSM381343 Blood_cell_GSM381343
## Blood_cell_GSM381339 Blood_cell_GSM381339
## Blood_cell_GSM381345 Blood_cell_GSM381345
## Blood_cell_GSM381340 Blood_cell_GSM381340
## Blood_cell_GSM381346 Blood_cell_GSM381346
## Blood_cell_GSM381342 Blood_cell_GSM381342
## Blood_cell_GSM381344 Blood_cell_GSM381344
## Blood_cell_GSM310440 Blood_cell_GSM310440
## Blood_cell_GSM488972 Blood_cell_GSM488972
## Blood_cell_GSM488973 Blood_cell_GSM488973
## Blood_cell_GSM310431 Blood_cell_GSM310431
## Blood_cell_GSM310437 Blood_cell_GSM310437
## Blood_cell_GSM310439 Blood_cell_GSM310439
## Blood_cell_GSM310432 Blood_cell_GSM310432
## Blood_cell_GSM310436 Blood_cell_GSM310436
## Blood_cell_GSM310433 Blood_cell_GSM310433
## Blood_cell_GSM310434 Blood_cell_GSM310434
## Blood_cell_GSM310435 Blood_cell_GSM310435
## Blood_cell_GSM310430 Blood_cell_GSM310430
## Blood_cell_GSM310438 Blood_cell_GSM310438
## Blood_cell_GSM290420 Blood_cell_GSM290420
## Blood_cell_GSM290414 Blood_cell_GSM290414
## Blood_cell_GSM290415 Blood_cell_GSM290415
## Blood_cell_GSM290421 Blood_cell_GSM290421
## Blood_cell_GSM290423 Blood_cell_GSM290423
## Blood_cell_GSM1209554 Blood_cell_GSM1209554
## Blood_cell_GSM1209569 Blood_cell_GSM1209569
## Blood_cell_GSM1209556 Blood_cell_GSM1209556
## Blood_cell_GSM1209572 Blood_cell_GSM1209572
## Blood_cell_GSM1209555 Blood_cell_GSM1209555
## Blood_cell_GSM1209557 Blood_cell_GSM1209557
## Blood_cell_GSM1209564 Blood_cell_GSM1209564
## Blood_cell_GSM1209568 Blood_cell_GSM1209568
## Blood_cell_GSM1209566 Blood_cell_GSM1209566
## Blood_cell_GSM1209570 Blood_cell_GSM1209570
## Blood_cell_GSM1209567 Blood_cell_GSM1209567
## Blood_cell_GSM1209590 Blood_cell_GSM1209590
## Blood_cell_GSM1209565 Blood_cell_GSM1209565
## Blood_cell_GSM1209571 Blood_cell_GSM1209571
## cutree.row_clst..k...10..row_clst.order.
## ES_iPS_germ_GSM530604 9
## ES_iPS_germ_GSM530606 9
## ES_iPS_germ_GSM530601 9
## ES_iPS_germ_GSM530603 9
## ES_iPS_germ_GSM372156 9
## ES_iPS_germ_GSM372154 9
## ES_iPS_germ_GSM372155 9
## ES_iPS_germ_GSM469409 9
## ES_iPS_germ_GSM172866 9
## ES_iPS_germ_GSM172865 9
## ES_iPS_germ_GSM172870 9
## ES_iPS_germ_GSM172868 9
## ES_iPS_germ_GSM172867 9
## ES_iPS_germ_GSM172869 9
## ES_iPS_germ_GSM540716 9
## ES_iPS_germ_GSM540714 9
## ES_iPS_germ_GSM540715 9
## ES_iPS_germ_GSM402806 9
## ES_iPS_germ_GSM402717 9
## ES_iPS_germ_GSM402752 9
## ES_iPS_germ_GSM530611 9
## _C_SNU398_liver 9
## ES_iPS_germ_GSM501008 9
## ES_iPS_germ_GSM501007 9
## ES_iPS_germ_GSM501009 9
## ES_iPS_germ_GSM501004 9
## ES_iPS_germ_GSM501006 9
## ES_iPS_germ_GSM500996 9
## ES_iPS_germ_GSM500997 9
## ES_iPS_germ_GSM501000 9
## ES_iPS_germ_GSM500998 9
## ES_iPS_germ_GSM500999 9
## ES_iPS_germ_GSM347922 9
## ES_iPS_germ_GSM501005 9
## ES_iPS_germ_GSM378811 9
## ES_iPS_germ_GSM347917 9
## ES_iPS_germ_GSM347916 9
## ES_iPS_germ_GSM347918 9
## ES_iPS_germ_GSM347924 9
## ES_iPS_germ_GSM347923 9
## ES_iPS_germ_GSM347925 9
## ES_iPS_germ_GSM225042 9
## ES_iPS_germ_GSM230294 9
## ES_iPS_germ_GSM530602 9
## ES_iPS_germ_GSM530605 9
## ES_iPS_germ_GSM530607 9
## ES_iPS_germ_GSM372157 9
## ES_iPS_germ_GSM372159 9
## ES_iPS_germ_GSM367062 9
## ES_iPS_germ_GSM372158 9
## ES_iPS_germ_GSM367243 9
## ES_iPS_germ_GSM367244 9
## ES_iPS_germ_GSM367245 9
## ES_iPS_germ_GSM367258 9
## ES_iPS_germ_GSM367061 9
## ES_iPS_germ_GSM367241 9
## ES_iPS_germ_GSM367242 9
## ES_iPS_germ_GSM367219 9
## ES_iPS_germ_GSM367240 9
## Neuro_endo_GSM53385 8
## Neuro_endo_GSM53386 8
## Neuro_endo_GSM53382 8
## Neuro_endo_GSM53384 8
## Neuro_endo_GSM53383 8
## Neuro_endo_GSM53387 8
## ES_iPS_germ_GSM304262 8
## ES_iPS_germ_GSM304260 8
## ES_iPS_germ_GSM304261 8
## ES_iPS_germ_GSM158468 8
## ES_iPS_germ_GSM158470 8
## Other_GSM173542 3
## Other_GSM173541 3
## Other_GSM173543 3
## Other_GSM173538 3
## Other_GSM173539 3
## Other_GSM173546 3
## Other_GSM173544 3
## Other_GSM173540 3
## Other_GSM173545 3
## Other_GSM173552 3
## Other_GSM173550 3
## Other_GSM173551 3
## Other_GSM173535 3
## Other_GSM173556 3
## Other_GSM173553 3
## Other_GSM173536 3
## Other_GSM173537 3
## Other_GSM173554 3
## Other_GSM173555 3
## Other_GSM173534 3
## Other_GSM173547 3
## Other_GSM173548 3
## Other_GSM173549 3
## Other_GSM173532 3
## Other_GSM173533 3
## Other_GSM119354 3
## Other_GSM119362 3
## Other_GSM119360 3
## Other_GSM119357 3
## Other_GSM119359 3
## Other_GSM119361 3
## Other_GSM119371 3
## Other_GSM119366 3
## Other_GSM119369 3
## Other_GSM119372 3
## Other_GSM299096 3
## Other_GSM299095 3
## Other_GSM299097 3
## Other_GSM299098 3
## Other_GSM299099 3
## Other_GSM299100 3
## Endothel_GSM410679 7
## Endothel_GSM410680 7
## Endothel_GSM410681 7
## Endothel_GSM410678 7
## Endothel_GSM410666 7
## Endothel_GSM410669 7
## Endothel_GSM410667 7
## Endothel_GSM410668 7
## Endothel_GSM410675 7
## Endothel_GSM410684 7
## Endothel_GSM410673 7
## Endothel_GSM410672 7
## Endothel_GSM410674 7
## Endothel_GSM410685 7
## Endothel_GSM410686 7
## Endothel_GSM410687 7
## Endothel_GSM143898 7
## Endothel_GSM143900 7
## Endothel_GSM143910 7
## Endothel_GSM143914 7
## Endothel_GSM143717 7
## Endothel_GSM143907 7
## Endothel_GSM305787 7
## Endothel_GSM305784 7
## Endothel_GSM305785 7
## Endothel_GSM476784 7
## Endothel_GSM476783 7
## Endothel_GSM476786 7
## Endothel_GSM476782 7
## Endothel_GSM476785 7
## Endothel_GSM492832 7
## Endothel_GSM492833 7
## Endothel_GSM141252 7
## Endothel_GSM141253 7
## Endothel_GSM141251 7
## Endothel_GSM141255 7
## Endothel_GSM330314 7
## Endothel_GSM143726 7
## Endothel_GSM335859 7
## Endothel_GSM330313 7
## Endothel_GSM335393 7
## Endothel_GSM335851 7
## Endothel_GSM335395 7
## Endothel_GSM385350 7
## Endothel_GSM385353 7
## Endothel_GSM143727 7
## Endothel_GSM385333 7
## Endothel_GSM385338 7
## Endothel_GSM346952 7
## Endothel_GSM346951 7
## Endothel_GSM551183 7
## Endothel_GSM330315 7
## Endothel_GSM335904 7
## Endothel_GSM330316 7
## Endothel_GSM335396 7
## Endothel_GSM335906 7
## Endothel_GSM336559 7
## Endothel_GSM143729 7
## Endothel_GSM143728 7
## Endothel_GSM143731 7
## Endothel_GSM143732 7
## Endothel_GSM143733 7
## Endothel_GSM143730 7
## Endothel_GSM305786 7
## Stromal_cell_GSM413842 2
## Stromal_cell_GSM372142 2
## Stromal_cell_GSM372144 2
## Stromal_cell_GSM372146 2
## Stromal_cell_GSM366942 2
## Stromal_cell_GSM402707 2
## Stromal_cell_GSM500995 2
## Stromal_cell_GSM347919 2
## Stromal_cell_GSM347920 2
## Stromal_cell_GSM501001 2
## Stromal_cell_GSM501002 2
## Stromal_cell_GSM501003 2
## Stromal_cell_GSM501890 2
## Stromal_cell_GSM501895 2
## Stromal_cell_GSM501891 2
## Stromal_cell_GSM501894 2
## Stromal_cell_GSM501892 2
## Stromal_cell_GSM501893 2
## Stromal_cell_GSM260309 2
## Stromal_cell_GSM260311 2
## Stromal_cell_GSM260312 2
## Stromal_cell_GSM260310 2
## Stromal_cell_GSM260313 2
## Stromal_cell_GSM260305 2
## Stromal_cell_GSM260306 2
## Stromal_cell_GSM260308 2
## Stromal_cell_GSM260321 2
## Stromal_cell_GSM260307 2
## Stromal_cell_GSM260314 2
## Stromal_cell_GSM260322 2
## Stromal_cell_GSM287219 2
## Stromal_cell_GSM287218 2
## Stromal_cell_GSM287222 2
## Stromal_cell_GSM287217 2
## Stromal_cell_GSM287216 2
## Stromal_cell_GSM287220 2
## Stromal_cell_GSM239260 2
## Stromal_cell_GSM239379 2
## Stromal_cell_GSM239457 2
## Stromal_cell_GSM239606 2
## Stromal_cell_GSM239612 2
## Stromal_cell_GSM239613 2
## Stromal_cell_GSM239668 2
## Stromal_cell_GSM239616 2
## Stromal_cell_GSM239669 2
## Stromal_cell_GSM413847 2
## Stromal_cell_GSM413846 2
## Stromal_cell_GSM413848 2
## Stromal_cell_GSM260669 2
## Stromal_cell_GSM260672 2
## Stromal_cell_GSM260671 2
## Stromal_cell_GSM260670 2
## Stromal_cell_GSM260673 2
## Stromal_cell_GSM260682 2
## Stromal_cell_GSM260685 2
## Stromal_cell_GSM260674 2
## Stromal_cell_GSM260684 2
## Stromal_cell_GSM260666 2
## Stromal_cell_GSM260665 2
## Stromal_cell_GSM260663 2
## Stromal_cell_GSM260668 2
## Stromal_cell_GSM260664 2
## Stromal_cell_GSM260675 2
## Stromal_cell_GSM260681 2
## Stromal_cell_GSM260667 2
## Stromal_cell_GSM260678 2
## Stromal_cell_GSM260676 2
## Stromal_cell_GSM260679 2
## Stromal_cell_GSM260686 2
## Stromal_cell_GSM260680 2
## Stromal_cell_GSM260683 2
## Stromal_cell_GSM451153 2
## Stromal_cell_GSM451156 2
## Stromal_cell_GSM260661 2
## Stromal_cell_GSM260662 2
## Stromal_cell_GSM250019 2
## Stromal_cell_GSM260657 2
## Stromal_cell_GSM451154 2
## Stromal_cell_GSM451157 2
## Stromal_cell_GSM451158 2
## Stromal_cell_GSM250020 2
## Stromal_cell_GSM260658 2
## Stromal_cell_GSM250021 2
## Stromal_cell_GSM260659 2
## Stromal_cell_GSM451155 2
## Stromal_cell_GSM451160 2
## Stromal_cell_GSM451161 2
## _B_Li7_liver 2
## _B_SNU878_liver 2
## Stromal_cell_GSM346959 2
## Stromal_cell_GSM346960 2
## Stromal_cell_GSM116106 2
## Stromal_cell_GSM116103 2
## Stromal_cell_GSM116101 2
## Stromal_cell_GSM116102 2
## Stromal_cell_GSM116104 2
## Stromal_cell_GSM116105 2
## Stromal_cell_GSM346941 2
## Stromal_cell_GSM346942 2
## Stromal_cell_GSM492834 2
## Stromal_cell_GSM492835 2
## Stromal_cell_GSM322374 2
## Stromal_cell_GSM322375 2
## Stromal_cell_GSM322376 2
## Stromal_cell_GSM322377 2
## Stromal_cell_GSM413840 2
## Stromal_cell_GSM469126 2
## Stromal_cell_GSM469130 2
## Stromal_cell_GSM469127 2
## Stromal_cell_GSM469128 2
## Stromal_cell_GSM469129 2
## Stromal_cell_GSM346944 2
## Stromal_cell_GSM469125 2
## Stromal_cell_GSM346943 2
## Stromal_cell_GSM469132 2
## Stromal_cell_GSM469131 2
## Stromal_cell_GSM469136 2
## Stromal_cell_GSM265498 2
## Stromal_cell_GSM265494 2
## Stromal_cell_GSM265496 2
## Stromal_cell_GSM265495 2
## Stromal_cell_GSM265497 2
## Stromal_cell_GSM265499 2
## Neuro_endo_GSM92232 2
## Neuro_endo_GSM92234 2
## Neuro_endo_GSM92231 2
## Neuro_endo_GSM92233 2
## Neuro_endo_GSM469411 2
## Neuro_endo_GSM469412 2
## _B_SNU761_liver 2
## _C_SKHEP1_liver 2
## _B_SNU182_liver 2
## _B_SNU449_liver 2
## _B_HLE_liver 2
## _B_HLF_liver 2
## _B_SNU475_liver 2
## _B_SNU886_liver 2
## _B_JHH4_liver 2
## _B_SNU387_liver 2
## _B_SNU423_liver 2
## _B_JHH2_liver 2
## _C_JHH6_liver 2
## Hepatocytes_GSM456350 10
## Hepatocytes_GSM456349 10
## Hepatocytes_GSM456351 10
## _A_Alexander cells_liver 10
## _A_PLC_PRF_5_liver 10
## _A_HuH6_liver 10
## _A_huH1_liver 10
## _A_HuH7_liver 10
## _A_JHH5_liver 10
## _A_JHH7_liver 10
## _A_Hep 3B2.17_liver 10
## _A_C3A_liver 10
## _A_Hep G2_liver 10
## _C_JHH1_liver 1
## Blood_cell_GSM359754 1
## Blood_cell_GSM359760 1
## Blood_cell_GSM359758 1
## Blood_cell_GSM359753 1
## Blood_cell_GSM359759 1
## Blood_cell_GSM359332 1
## Blood_cell_GSM359755 1
## Blood_cell_GSM300401 1
## Blood_cell_GSM300399 1
## Blood_cell_GSM300403 1
## Blood_cell_GSM300404 1
## Blood_cell_GSM300392 1
## Blood_cell_GSM300394 1
## Blood_cell_GSM300398 1
## Blood_cell_GSM300393 1
## Blood_cell_GSM300402 1
## Blood_cell_GSM300390 1
## Blood_cell_GSM300389 1
## Blood_cell_GSM300395 1
## Blood_cell_GSM514672 1
## Blood_cell_GSM514670 1
## Blood_cell_GSM514669 1
## Blood_cell_GSM343806 1
## Blood_cell_GSM343822 1
## Blood_cell_GSM343824 1
## Blood_cell_GSM514671 1
## Blood_cell_GSM343817 1
## Blood_cell_GSM343819 1
## Blood_cell_GSM343815 1
## Blood_cell_GSM343805 1
## Blood_cell_GSM343831 1
## Blood_cell_GSM343807 1
## Blood_cell_GSM343813 1
## Blood_cell_GSM343825 1
## Blood_cell_GSM343811 1
## Blood_cell_GSM343829 1
## Blood_cell_GSM343808 1
## Blood_cell_GSM343810 1
## Blood_cell_GSM343812 1
## Blood_cell_GSM419989 1
## Blood_cell_GSM343828 1
## Blood_cell_GSM343830 1
## Blood_cell_GSM343816 1
## Blood_cell_GSM343818 1
## Blood_cell_GSM419988 1
## Blood_cell_GSM343802 1
## Blood_cell_GSM343804 1
## Blood_cell_GSM419992 1
## Blood_cell_GSM419987 1
## Blood_cell_GSM419990 1
## Blood_cell_GSM419991 1
## Blood_cell_GSM343821 1
## Blood_cell_GSM343809 1
## Blood_cell_GSM343814 1
## Blood_cell_GSM343826 1
## Blood_cell_GSM343803 1
## Blood_cell_GSM343827 1
## Blood_cell_GSM343820 1
## Blood_cell_GSM343823 1
## Blood_cell_GSM132924 1
## Blood_cell_GSM132926 1
## Blood_cell_GSM132928 1
## Blood_cell_GSM132927 1
## Blood_cell_GSM132919 1
## Blood_cell_GSM132923 1
## Blood_cell_GSM132925 1
## Blood_cell_GSM132921 1
## Blood_cell_GSM132922 1
## Blood_cell_GSM132929 1
## Blood_cell_GSM132930 1
## Blood_cell_GSM181930 1
## Blood_cell_GSM181971 1
## Blood_cell_GSM181973 1
## Blood_cell_GSM181982 1
## Blood_cell_GSM181997 1
## Blood_cell_GSM181931 1
## Blood_cell_GSM181933 1
## Blood_cell_GSM181857 1
## Blood_cell_GSM181978 1
## Blood_cell_GSM140953 1
## Blood_cell_GSM160534 1
## Blood_cell_GSM140968 1
## Blood_cell_GSM140969 1
## Blood_cell_GSM286088 1
## Blood_cell_GSM320546 1
## Blood_cell_GSM320544 1
## Blood_cell_GSM320548 1
## Blood_cell_GSM320550 1
## Blood_cell_GSM320552 1
## Blood_cell_GSM320545 1
## Blood_cell_GSM320551 1
## Blood_cell_GSM320547 1
## Blood_cell_GSM320549 1
## Blood_cell_GSM140973 1
## Blood_cell_GSM320543 1
## Blood_cell_GSM183305 1
## Blood_cell_GSM183393 1
## Blood_cell_GSM183482 1
## Blood_cell_GSM183467 1
## Blood_cell_GSM183392 1
## Blood_cell_GSM183466 1
## Blood_cell_GSM183316 1
## Blood_cell_GSM183463 1
## Blood_cell_GSM183394 1
## Blood_cell_GSM183462 1
## Blood_cell_GSM183306 1
## Blood_cell_GSM183217 1
## Blood_cell_GSM183315 1
## Blood_cell_GSM183464 1
## Blood_cell_GSM183465 1
## Blood_cell_GSM183487 1
## Blood_cell_GSM183209 1
## Blood_cell_GSM183165 1
## Blood_cell_GSM183486 1
## Blood_cell_GSM183196 1
## Blood_cell_GSM183483 1
## Blood_cell_GSM183485 1
## Blood_cell_GSM183193 1
## Blood_cell_GSM183201 1
## Blood_cell_GSM183484 1
## Blood_cell_GSM112670 1
## Blood_cell_GSM112490 1
## Blood_cell_GSM112668 1
## Blood_cell_GSM112540 1
## Blood_cell_GSM112491 1
## Blood_cell_GSM112669 1
## Blood_cell_GSM160530 1
## Blood_cell_GSM112664 1
## Blood_cell_GSM112666 1
## Blood_cell_GSM112661 1
## Blood_cell_GSM112665 1
## Blood_cell_GSM305433 1
## Blood_cell_GSM305435 1
## Blood_cell_GSM305441 1
## Blood_cell_GSM305442 1
## Blood_cell_GSM305437 1
## Blood_cell_GSM305439 1
## Blood_cell_GSM182000 1
## Blood_cell_GSM182002 1
## Blood_cell_GSM556663 1
## Blood_cell_GSM556665 1
## Blood_cell_GSM286091 1
## Blood_cell_GSM286089 1
## Blood_cell_GSM286090 1
## Blood_cell_GSM286017 1
## Blood_cell_GSM286086 1
## Blood_cell_GSM286087 1
## Blood_cell_GSM112541 1
## Blood_cell_GSM260694 1
## Blood_cell_GSM260695 1
## Blood_cell_GSM260691 1
## Blood_cell_GSM260692 1
## Blood_cell_GSM260689 1
## Blood_cell_GSM260697 1
## Blood_cell_GSM260699 1
## Blood_cell_GSM260693 1
## Blood_cell_GSM260690 1
## Blood_cell_GSM260696 1
## Blood_cell_GSM260701 1
## Blood_cell_GSM260698 1
## Blood_cell_GSM260700 1
## Blood_cell_GSM181974 1
## Blood_cell_GSM181976 1
## Blood_cell_GSM181981 1
## Blood_cell_GSM181984 1
## Blood_cell_GSM181999 1
## Blood_cell_GSM299559 1
## Blood_cell_GSM299560 1
## Blood_cell_GSM299565 1
## Blood_cell_GSM160532 1
## Blood_cell_GSM299564 1
## Blood_cell_GSM140970 1
## Blood_cell_GSM286015 1
## Blood_cell_GSM112667 1
## Blood_cell_GSM140971 1
## Blood_cell_GSM181972 1
## Blood_cell_GSM264757 1
## Blood_cell_GSM264758 1
## Blood_cell_GSM264755 1
## Blood_cell_GSM264756 1
## Blood_cell_GSM160536 1
## Blood_cell_GSM181983 1
## Blood_cell_GSM181998 1
## Blood_cell_GSM181980 1
## Blood_cell_GSM182001 1
## Blood_cell_GSM549579 5
## Blood_cell_GSM549577 5
## Blood_cell_GSM549578 5
## Blood_cell_GSM549581 5
## Blood_cell_GSM549580 5
## Blood_cell_GSM549583 5
## Blood_cell_GSM549582 5
## Blood_cell_GSM549584 5
## Blood_cell_GSM361278 5
## Blood_cell_GSM361266 5
## Blood_cell_GSM361272 5
## Blood_cell_GSM361283 5
## Blood_cell_GSM361285 5
## Blood_cell_GSM466518 5
## Blood_cell_GSM466519 5
## Blood_cell_GSM466515 5
## Blood_cell_GSM466516 5
## Blood_cell_GSM466517 5
## _C_NCIH684_liver 5
## Blood_cell_GSM289612 5
## Blood_cell_GSM289618 5
## Blood_cell_GSM289615 5
## Blood_cell_GSM289617 5
## Blood_cell_GSM289616 5
## Blood_cell_GSM289613 5
## Blood_cell_GSM289614 5
## Blood_cell_GSM483483 5
## Blood_cell_GSM483484 5
## Blood_cell_GSM483485 5
## Blood_cell_GSM483480 5
## Blood_cell_GSM483481 5
## Blood_cell_GSM483482 5
## Blood_cell_GSM488980 5
## Blood_cell_GSM488981 5
## Blood_cell_GSM488970 5
## Blood_cell_GSM488971 5
## Blood_cell_GSM488968 5
## Blood_cell_GSM488969 5
## Blood_cell_GSM488982 5
## Blood_cell_GSM488983 5
## Blood_cell_GSM488974 5
## Blood_cell_GSM488975 5
## Blood_cell_GSM189447 5
## Blood_cell_GSM189448 5
## Blood_cell_GSM189452 5
## Blood_cell_GSM189454 5
## Blood_cell_GSM189451 5
## Blood_cell_GSM189453 5
## Blood_cell_GSM189449 5
## Blood_cell_GSM189450 5
## Blood_cell_GSM305432 5
## Blood_cell_GSM305436 5
## Blood_cell_GSM305430 5
## Blood_cell_GSM305434 5
## Blood_cell_GSM182003 5
## Blood_cell_GSM182004 5
## Blood_cell_GSM181932 5
## Blood_cell_GSM181934 5
## Blood_cell_GSM299557 5
## Blood_cell_GSM299558 5
## Blood_cell_GSM305438 5
## Blood_cell_GSM299563 5
## Blood_cell_GSM299562 5
## Blood_cell_GSM305440 5
## Blood_cell_GSM422113 5
## Blood_cell_GSM422114 5
## Blood_cell_GSM422116 5
## Blood_cell_GSM422111 5
## Blood_cell_GSM422112 5
## Blood_cell_GSM422110 5
## Blood_cell_GSM140244 5
## Blood_cell_GSM422109 5
## Blood_cell_GSM1209586 5
## Blood_cell_GSM1209588 5
## Blood_cell_GSM1209589 5
## Blood_cell_GSM1209585 5
## Blood_cell_GSM1209587 5
## Blood_cell_GSM1209560 5
## Blood_cell_GSM1209558 5
## Blood_cell_GSM1209559 5
## Blood_cell_GSM140245 5
## Blood_cell_GSM140248 5
## Blood_cell_GSM140249 5
## Blood_cell_GSM178554 5
## Blood_cell_GSM178555 5
## Blood_cell_GSM140246 5
## Blood_cell_GSM140247 5
## Blood_cell_GSM178550 5
## Blood_cell_GSM178551 5
## Blood_cell_GSM178557 5
## Blood_cell_GSM488978 5
## Blood_cell_GSM178549 5
## Blood_cell_GSM178552 5
## Blood_cell_GSM178553 5
## Blood_cell_GSM488979 5
## Blood_cell_GSM178558 5
## Blood_cell_GSM299561 5
## Blood_cell_GSM178556 5
## Blood_cell_GSM299556 5
## Blood_cell_GSM432176 5
## Blood_cell_GSM350084 5
## Blood_cell_GSM350085 5
## Blood_cell_GSM350086 5
## Blood_cell_GSM432180 5
## Blood_cell_GSM432178 5
## Blood_cell_GSM432179 5
## Blood_cell_GSM432175 5
## Blood_cell_GSM432177 5
## Blood_cell_GSM556647 5
## Blood_cell_GSM488976 5
## Blood_cell_GSM488977 5
## Blood_cell_GSM1209591 6
## Blood_cell_GSM1209595 6
## Blood_cell_GSM1209594 6
## Blood_cell_GSM1209592 6
## Blood_cell_GSM1209593 6
## Blood_cell_GSM1209598 6
## Blood_cell_GSM1209597 6
## Blood_cell_GSM1209596 6
## Blood_cell_GSM1209599 6
## Blood_cell_GSM279574 4
## Blood_cell_GSM279580 4
## Blood_cell_GSM279577 4
## Blood_cell_GSM279578 4
## Blood_cell_GSM279581 4
## Blood_cell_GSM279582 4
## Blood_cell_GSM279575 4
## Blood_cell_GSM279576 4
## Blood_cell_GSM279572 4
## Blood_cell_GSM279573 4
## Blood_cell_GSM279583 4
## Blood_cell_GSM279579 4
## Blood_cell_GSM279584 4
## Blood_cell_GSM372813 4
## Blood_cell_GSM372804 4
## Blood_cell_GSM372803 4
## Blood_cell_GSM372810 4
## Blood_cell_GSM372816 4
## Blood_cell_GSM372818 4
## Blood_cell_GSM372800 4
## Blood_cell_GSM372809 4
## Blood_cell_GSM372811 4
## Blood_cell_GSM372808 4
## Blood_cell_GSM372817 4
## Blood_cell_GSM372806 4
## Blood_cell_GSM372807 4
## Blood_cell_GSM372801 4
## Blood_cell_GSM372802 4
## Blood_cell_GSM372812 4
## Blood_cell_GSM372805 4
## Blood_cell_GSM372814 4
## Blood_cell_GSM372815 4
## Blood_cell_GSM1209577 4
## Blood_cell_GSM1209580 4
## Blood_cell_GSM1209578 4
## Blood_cell_GSM1209579 4
## Blood_cell_GSM1209582 4
## Blood_cell_GSM1209561 4
## Blood_cell_GSM1209576 4
## Blood_cell_GSM1209563 4
## Blood_cell_GSM1209573 4
## Blood_cell_GSM1209562 4
## Blood_cell_GSM1209583 4
## Blood_cell_GSM1209575 4
## Blood_cell_GSM1209581 4
## Blood_cell_GSM1209574 4
## Blood_cell_GSM1209584 4
## Blood_cell_GSM153893 4
## Blood_cell_GSM154073 4
## Blood_cell_GSM154084 4
## Blood_cell_GSM154077 4
## Blood_cell_GSM154078 4
## Blood_cell_GSM154081 4
## Blood_cell_GSM547998 4
## Blood_cell_GSM548000 4
## Blood_cell_GSM547999 4
## Blood_cell_GSM548001 4
## Blood_cell_GSM542578 4
## Blood_cell_GSM349848 4
## Blood_cell_GSM349849 4
## Blood_cell_GSM310429 4
## Blood_cell_GSM198944 4
## Blood_cell_GSM198945 4
## Blood_cell_GSM198942 4
## Blood_cell_GSM198943 4
## Blood_cell_GSM381341 4
## Blood_cell_GSM381343 4
## Blood_cell_GSM381339 4
## Blood_cell_GSM381345 4
## Blood_cell_GSM381340 4
## Blood_cell_GSM381346 4
## Blood_cell_GSM381342 4
## Blood_cell_GSM381344 4
## Blood_cell_GSM310440 4
## Blood_cell_GSM488972 4
## Blood_cell_GSM488973 4
## Blood_cell_GSM310431 4
## Blood_cell_GSM310437 4
## Blood_cell_GSM310439 4
## Blood_cell_GSM310432 4
## Blood_cell_GSM310436 4
## Blood_cell_GSM310433 4
## Blood_cell_GSM310434 4
## Blood_cell_GSM310435 4
## Blood_cell_GSM310430 4
## Blood_cell_GSM310438 4
## Blood_cell_GSM290420 4
## Blood_cell_GSM290414 4
## Blood_cell_GSM290415 4
## Blood_cell_GSM290421 4
## Blood_cell_GSM290423 4
## Blood_cell_GSM1209554 4
## Blood_cell_GSM1209569 4
## Blood_cell_GSM1209556 4
## Blood_cell_GSM1209572 4
## Blood_cell_GSM1209555 4
## Blood_cell_GSM1209557 4
## Blood_cell_GSM1209564 4
## Blood_cell_GSM1209568 4
## Blood_cell_GSM1209566 4
## Blood_cell_GSM1209570 4
## Blood_cell_GSM1209567 4
## Blood_cell_GSM1209590 4
## Blood_cell_GSM1209565 4
## Blood_cell_GSM1209571 4
range2 <- range(row_clst_df[row_clst_df$"cutree.row_clst..k...10..row_clst.order."=="2",]$"X1.length.row_clst.order.")
range10 <- range(row_clst_df[row_clst_df$"cutree.row_clst..k...10..row_clst.order."=="10",]$"X1.length.row_clst.order.")
arrow_t_length <- 0.5
arrow_width <- 1
add_p <- ggplot()+
annotate("segment",x=range2[1], xend = range2[2]-1,y = 0, yend = 0, arrow=arrow(ends = "both", angle = 90,length = unit(arrow_t_length, "cm")),color="blue",size=arrow_width)+
annotate("segment",x=range10[1]+1, xend = range10[2],y = 0, yend = 0, arrow=arrow(ends = "both", angle = 90,length = unit(arrow_t_length, "cm")),color="red",size=arrow_width)+
coord_flip()+
scale_x_continuous(expand=c(0,0), limits = c(1,741))+
theme_ggh()
add_p
col_mod <- function(chr,sub = -32){
is.color <- function(chr){
res <- try(col2rgb(chr), silent = TRUE)
return(!"try-error"%in%class(res))
}
if(is.color(chr)){
color_in <- col2rgb(chr)
color_in <- color_in + sub
color_in <- ifelse(color_in >= 255, 255, color_in)
color_in <- ifelse(color_in <= 0, 0, color_in)
color_out <- as.hexmode(color_in)
color_out <- as.character(color_out)
color_out <- paste("#",
color_out[1],color_out[2],color_out[3],sep = "")
return(color_out)
}else{
return("black")
}
}
newcol3 <- c(A="#e31a1c",B="#1f78b4",C="#33a02c",
Other="#fdbf6f",Stromal_cell="#6a3d9a",Hepatocytes="#ff7f00",Endothel="#a6cee3",
Neuro_endo="#cab2d6",ES_iPS_germ="#fb9a99",Blood_cell="#b2df8a")
newcol3[1:5] <- sapply(newcol3[1:5], col_mod, -16)
newcol3[6:10] <- sapply(newcol3[6:10], col_mod, +32)
lmat <- rbind(c(7,7,7,1,1,1,1),
c(7,7,7,5,1,1,1),
c(7,7,7,3,1,1,1),
c(1,6,4,2,11,10,9),
c(1,1,1,8,1,1,1))
lwid <- c(0.1,0.2, 0.08, 1, 0.08,0.45,0.01)
lhei <- c(0.1,0.2,0.1,2,0.01)
gh_new2 <- ggheat2(df = data_new_categ$matrix,clst_method = "ward.D2",dist_method = "spearman",colslider = data_new_categ$colslider, rowslider = data_new_categ$rowslider,colname_label = F, rowname_label = F,rowslider_palette = newcol3,main = "",lmat = lmat, lwid = lwid,lhei = lhei,font.size = 14,add_p2 = add_p)
## Warning: Ignoring unknown aesthetics: width, height
grid.draw(gh_new2$plot_data)
ggsave(plot = gh_new2$plot_data,filename = "ggheat_stroma_emph2.tiff",dpi = 300,width = 18,height = 18,units = "cm")
#downloader::download(url = "http://www.macrophages.com/sites/default/files/repbiolayoutdatasets/Human_primary_cell_atlas.expression.zip",destfile="pca.zip")
#unzip("./pca.zip")
PCatlas <- read.table(file = "./Human_primary_cell_atlas.expression",header = T,sep = "\t",stringsAsFactors = F,quote = "")
categ4 <- list(Tcell=c("T_cell","T cell","T cells","CD4 cells","Treg","t_cell","Effector memory","Central memory","Naive, donor"),
Bcell=c("B-cells","B cells","B cell"),
Mono_Macro = c("cell type: Monocyte","monocytes","monopcytes","Peripheral blood from healthy human donor","macrophages","Macrophages"),
Erythroblast = c("Erythroblast"),
BM_HSC =c("Bone marrow & progenitors","Myelocytes","MEP cells","GMP cells","CMP cells",
"HSC","Human composite bone marrow","peripheral blood, prior"),
Neutrophils=c("Neutrophils","neutrophils","PMN"),
Gametes=c("Sperm","Oocytes","oocytes"),
Centrocytes=c("centrocyte","centroblast"),
NKcells=c("NK cells","Natural killer cells","Natural Killer cells "),
Dendritic_cells=c("Dendritic cells","dendritic cells","MDDC","DCs","Dcs"),
MSC=c("-defrived mesenchymal stem cells","BM MSC","BM-MSC","cell type: mesenchymal stem cells","derived mesenchymal stem cells"),
Plt=c("platelet"),
SMC=c("smooth muscle cells","Smooth Muscle Cells","SMCs","smooth muscle cell"),
Neuron=c("Nerve","astrocytes"),
Endocrine=c("adrenal medulla"),
Keratinocytes=c("keratinocytes"),
Hepatocytes=c("hepatocyte"),
Bone_etc=c("osteoblast","chondrocyte","DPSCs"),
Adipocytes=c("adipocyte","adipose stem cell"),
Vascular=c("lymphatic endothelial cells","HUVEC","Vein ECs","blood vessel endothelial cell","HMVEC","cell type: Endothelial cells"),
Fibroblasts=c("Foreskin Cells","normal fibroblast","cell type: fibroblast","Human Fibroblast cells","PDB fibroblasts","fibroblasts_","Fibroblasts uninfected","Fibroblasts infected"),
Epitel=c("bronchial epithelial cells"),
Bladder=c("bladder"),
ES_iPS = c("ESC", "ES cell","Human Embryonic Stem Cells","embryonic stem cells","iPS","hIPSC")
)
mat4cor <- data.frame(filename=cels,data_colname=data_colname,id=rowname_cands,stringsAsFactors = F)
#label_vector <- c("nn", "daw", "dafb", "nn","daw","dafb", "nn")
calc_categ <- function(proc_matrix, label_vector, func="mean"){
require(magrittr)
proc_matrix <- proc_matrix %>%
as.data.frame()
labels_uniq <- label_vector[!duplicated(label_vector)]
if(func=="mean"){
fun <- function(x){base::mean(x)}
}else if(func=="median"){
fun <- function(x){stats::median(x)}
}else{
return("func is mean or median")
}
proc_result <- NULL
for(i in 1:length(labels_uniq)){
matrix_lab_i <- proc_matrix[,label_vector==labels_uniq[i]]
proc_i <- apply(matrix_lab_i, 1, fun)
proc_result <- cbind(proc_result, proc_i)
}
colnames(proc_result) <- labels_uniq
return(proc_result)
}
mat4cor <- merge(mat4cor, result_df,by.x = "id", by.y = "geo_accession",sort = F,all.x = T)
mat4cor$title <- ifelse(test = is.na(mat4cor$title),yes = "",no = mat4cor$title)
mat4cor$source_name_ch1 <- ifelse(test = is.na(mat4cor$source_name_ch1),
yes = "",no = mat4cor$source_name_ch1)
mat4cor$characteristics_ch1 <- ifelse(test = is.na(mat4cor$characteristics_ch1),
yes = "",no = mat4cor$characteristics_ch1)
mat4cor$colname_tag <- base::paste(mat4cor$id, mat4cor$title)
mat4cor$category <- categolizer(annotation_df = data.frame(mat4cor$characteristics_ch1,
mat4cor$source_name_ch1,
mat4cor$title,stringsAsFactors = F),
dictionaly_list = categ4)
mat4cor$sample_tag <- paste(mat4cor$category, mat4cor$id, sep = "_")
mat4cor$sample_tag <- str_replace(mat4cor$sample_tag, "^_","")
mat4cor$category <- ifelse(mat4cor$category=="Mono_Macro_Dendritic_cells", yes="Mono_Macro", no=mat4cor$category)
mat4cor$category <- ifelse(mat4cor$category=="",str_extract(mat4cor$colname_tag,"^[ABC]"),mat4cor$category)
mat4anal <- log2(mas5_4each)
#mat4anal <- mas5_4each
truehist(as.matrix(mat4anal))
colnames_temp <- colnames(mat4anal)
colnames_temp <- str_replace_all(colnames_temp,pattern = "\\.cel\\.gz","")
colnames_temp <- str_replace_all(colnames_temp,pattern = "\\.cel|\\.CEL","")
colnametemp <- for(i in c(1:length(colnames_temp))){
if(str_detect(colnames_temp[i],"^[ABC]")){
colnames_temp[i] <- colnames_temp[i]
}
else if(str_detect(colnames_temp[i], "^GSM")){
colnames_temp[i] <- str_extract(colnames_temp[i], "^GSM[0-9]*")
}
else{
print("unknown condition")
}
}
#colnames_temp
#conv_mat$id
#colnames_temp[!colnames_temp %in% conv_mat$id]
#matrix_in_out = data.frame(conv_mat$id,conv_mat$sample_tag)
colnames_temp <- convertvector(inputvector = colnames_temp,
matrix_in_out = data.frame(mat4cor$id,
mat4cor$sample_tag,stringsAsFactors = F))
colnames(mat4anal) <- colnames_temp
rm(colnames_temp)
mat4anal <- mat4anal[,ref_sort(sort_vector = colnames(mat4anal),ref_vector = mat4cor$sample_tag)]
logical_center <- calc_categ(proc_matrix = mat4anal,label_vector = mat4cor$category,func = "median")
#logical_center <- logical_center[sort.list(apply(logical_center,1,mad)) <= 10000,]
truehist(apply(logical_center, 1, mad))
n <- mat4anal %>%
.[sort.list(apply(.,1,mad)) <= 5000,]
truehist(apply(n, 1, mad))
#logical_center <- calc_categ(proc_matrix = n,label_vector = mat4cor$category,func = "median")
cors1 <- as.data.frame(cor(logical_center, method = "spearman")) %>%
.[sort.list(.$B,decreasing = T),]
truehist(as.matrix(cors1))
write.csv(cors1, file = "category_cor.csv")
write.table(logical_center, file = "logical_center.tsv",sep = "\t",col.names = NA, row.names = T)
dict4out <- NULL
dict_label <- names(categ4)
for(i in 1:length(dict_label)){
name_i <- paste(categ4[[dict_label[i]]], collapse=",")
print(name_i)
dict4out <- rbind(dict4out, name_i)
rownames(dict4out)[i] <- dict_label[i]
}
## [1] "T_cell,T cell,T cells,CD4 cells,Treg,t_cell,Effector memory,Central memory,Naive, donor"
## [1] "B-cells,B cells,B cell"
## [1] "cell type: Monocyte,monocytes,monopcytes,Peripheral blood from healthy human donor,macrophages,Macrophages"
## [1] "Erythroblast"
## [1] "Bone marrow & progenitors,Myelocytes,MEP cells,GMP cells,CMP cells,HSC,Human composite bone marrow,peripheral blood, prior"
## [1] "Neutrophils,neutrophils,PMN"
## [1] "Sperm,Oocytes,oocytes"
## [1] "centrocyte,centroblast"
## [1] "NK cells,Natural killer cells,Natural Killer cells "
## [1] "Dendritic cells,dendritic cells,MDDC,DCs,Dcs"
## [1] "-defrived mesenchymal stem cells,BM MSC,BM-MSC,cell type: mesenchymal stem cells,derived mesenchymal stem cells"
## [1] "platelet"
## [1] "smooth muscle cells,Smooth Muscle Cells,SMCs,smooth muscle cell"
## [1] "Nerve,astrocytes"
## [1] "adrenal medulla"
## [1] "keratinocytes"
## [1] "hepatocyte"
## [1] "osteoblast,chondrocyte,DPSCs"
## [1] "adipocyte,adipose stem cell"
## [1] "lymphatic endothelial cells,HUVEC,Vein ECs,blood vessel endothelial cell,HMVEC,cell type: Endothelial cells"
## [1] "Foreskin Cells,normal fibroblast,cell type: fibroblast,Human Fibroblast cells,PDB fibroblasts,fibroblasts_,Fibroblasts uninfected,Fibroblasts infected"
## [1] "bronchial epithelial cells"
## [1] "bladder"
## [1] "ESC,ES cell,Human Embryonic Stem Cells,embryonic stem cells,iPS,hIPSC"
write.table(dict4out, file = "categ4.tsv",sep = "\t",row.names = T, col.names = NA)
sessionInfo()
## R version 3.4.2 (2017-09-28)
## Platform: x86_64-pc-linux-gnu (64-bit)
## Running under: Ubuntu 16.04.3 LTS
##
## Matrix products: default
## BLAS: /usr/lib/libblas/libblas.so.3.6.0
## LAPACK: /usr/lib/lapack/liblapack.so.3.6.0
##
## locale:
## [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
## [3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8
## [5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8
## [7] LC_PAPER=en_US.UTF-8 LC_NAME=C
## [9] LC_ADDRESS=C LC_TELEPHONE=C
## [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
##
## attached base packages:
## [1] stats4 parallel stats graphics grDevices utils datasets
## [8] methods base
##
## other attached packages:
## [1] magrittr_1.5 scales_0.4.1
## [3] ggdendro_0.1-20 gridExtra_2.2.1
## [5] reshape2_1.4.2 RobLox_1.0
## [7] RobAStBase_1.0.1 rrcov_1.4-3
## [9] robustbase_0.92-7 distrMod_2.6.1
## [11] RandVar_1.0.1 distrEx_2.6.1
## [13] distr_2.6.2 SweaveListingUtils_0.7.7
## [15] sfsmisc_1.1-1 startupmsg_0.9.4
## [17] doParallel_1.0.10 iterators_1.0.8
## [19] foreach_1.4.3 affy_1.54.0
## [21] GEOquery_2.42.0 Biobase_2.36.2
## [23] BiocGenerics_0.22.0 extrafont_0.17
## [25] ggplot2_2.2.1 MASS_7.3-47
## [27] stringr_1.2.0 BiocInstaller_1.26.0
##
## loaded via a namespace (and not attached):
## [1] lattice_0.20-35 pcaPP_1.9-72 colorspace_1.3-2
## [4] htmltools_0.3.6 yaml_2.1.14 XML_3.98-1.9
## [7] rlang_0.1.2 RColorBrewer_1.1-2 affyio_1.46.0
## [10] plyr_1.8.4 zlibbioc_1.22.0 munsell_0.4.3
## [13] gtable_0.2.0 mvtnorm_1.0-6 codetools_0.2-15
## [16] evaluate_0.10.1 knitr_1.17 Rttf2pt1_1.3.4
## [19] preprocessCore_1.38.1 DEoptimR_1.0-8 Rcpp_0.12.12
## [22] backports_1.1.0 digest_0.6.12 stringi_1.1.5
## [25] grid_3.4.2 rprojroot_1.2 tools_3.4.2
## [28] bitops_1.0-6 lazyeval_0.2.0 RCurl_1.95-4.8
## [31] tibble_1.3.3 cluster_2.0.6 extrafontdb_1.0
## [34] rmarkdown_1.6 httr_1.3.0 R6_2.2.2
## [37] compiler_3.4.2
Sys.time()
## [1] "2017-11-17 04:11:58 UTC"
Sys.info()
## sysname
## "Linux"
## release
## "4.4.0-98-generic"
## version
## "#121-Ubuntu SMP Tue Oct 10 14:24:03 UTC 2017"
## nodename
## "dry16was"
## machine
## "x86_64"
## login
## "unknown"
## user
## "r-user"
## effective_user
## "r-user"